From: Markus Rost <rost@math.uni-bielefeld.de>
Date: Sun, 27 Jul 2003 19:54:09 +0000 (+0000)
Subject: (set-visited-file-name): Use truename for buffer-file-name.
X-Git-Tag: ttn-vms-21-2-B4~9226
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b1f1ceb8aa88b3bd07fc6d1bba8915873ef05421;p=emacs.git

(set-visited-file-name): Use truename for buffer-file-name.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4759b4400f8..fd525e3bcb0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-07-27  Markus Rost  <rost@math.ohio-state.edu>
+
+	* files.el (set-visited-file-name): Use truename for buffer-file-name.
+
 2003-07-26  Markus Rost  <rost@math.ohio-state.edu>
 
 	* vc-hooks.el (vc-file-not-found-hook): Doc fix.
diff --git a/lisp/files.el b/lisp/files.el
index c62ef5555d3..5ec82a39206 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2355,7 +2355,7 @@ the old visited file has been renamed to the new name FILENAME."
 	(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))