1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/files.el b/lisp/files.el
index fb8c34bcae8..4eb1560a20d 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1929,7 +1929,7 @@ started Emacs, set `abbreviated-home-dir' to nil so it will be recalculated)."
                          (save-match-data
                            (string-match "^[a-zA-`]:/$" filename))))
                (equal (get 'abbreviated-home-dir 'home)
-                      (expand-file-name "~")))
+                      (save-match-data (expand-file-name "~"))))
           (setq filename
                 (concat "~"
                         (match-string 1 filename)