changeset 24727:358a330c9931

[from rms] (find-file-noselect-1): Use abbreviate-file-name when setting buffer-file-truename.
author Dave Love <fx@gnu.org>
date Fri, 14 May 1999 09:46:38 +0000
parents e097c31382f8
children e94104cf5891
files lisp/files.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Fri May 14 08:47:12 1999 +0000
+++ b/lisp/files.el	Fri May 14 09:46:38 1999 +0000
@@ -1049,7 +1049,8 @@
       ;; Record the file's truename, and maybe use that as visited name.
       (if (equal filename buffer-file-name)
 	  (setq buffer-file-truename truename)
-	(setq buffer-file-truename (file-truename buffer-file-name)))
+	(setq buffer-file-truename
+	      (abbreviate-file-name (file-truename buffer-file-name))))
       (setq buffer-file-number number)
       ;; On VMS, we may want to remember which directory in a search list
       ;; the file was found in.