# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 1059335620 0
# Node ID 041d0086818e314a6c4edb3dc15983cd5e7dc1c9
# Parent  8322fd2e3685140c2dbabc1382717cc718c9d70b
(set-visited-file-name): Use truename for buffer-file-name.

diff -r 8322fd2e3685 -r 041d0086818e lisp/files.el
--- 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))