# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 738458347 0
# Node ID 923f5564a2a1de98d347cb803c25549c73bd1097
# Parent  afc59d5d30c62bc8c3d0431521884d2c704c41e4
(find-file-noselect): Expand buffer-file-truename
before copying it to anything else.

diff -r afc59d5d30c6 -r 923f5564a2a1 lisp/files.el
--- a/lisp/files.el	Wed May 26 23:14:00 1993 +0000
+++ b/lisp/files.el	Wed May 26 23:19:07 1993 +0000
@@ -608,7 +608,9 @@
 		 (not (member logical find-file-not-true-dirname-list)))
 	       (setq buffer-file-name buffer-file-truename))
 	  (if find-file-visit-truename
-	      (setq buffer-file-name (setq filename buffer-file-truename)))
+	      (setq buffer-file-name
+		    (setq filename
+			  (expand-file-name buffer-file-truename))))
 	  ;; Set buffer's default directory to that of the file.
 	  (setq default-directory (file-name-directory filename))
 	  ;; Turn off backup files for certain file names.  Since