Mercurial > emacs

diff lisp/files.el @ 52056:041d0086818e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(set-visited-file-name): Use truename for buffer-file-name.
author Markus Rost <rost@math.uni-bielefeld.de>
date Sun, 27 Jul 2003 19:53:40 +0000
parents 38b96f89712a
children 374d8606ca76
line wrap: on
line diff
--- a/lisp/files.el	Sat Jul 26 16:07:25 2003 +0000
+++ b/lisp/files.el	Sun Jul 27 19:53:40 2003 +0000
@@ -2355,7 +2355,7 @@
 	(progn
 	  (setq buffer-file-truename (abbreviate-file-name truename))
 	  (if find-file-visit-truename
-	      (setq buffer-file-name buffer-file-truename))))
+	      (setq buffer-file-name truename))))
     (setq buffer-file-number
 	  (if filename
 	      (nthcdr 10 (file-attributes buffer-file-name))