# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 736018422 0
# Node ID 615f7101473ab84fbf9d0c4d8fe098d04f413138
# Parent  5122736c0a038eefa5f0cf3bb1bf5d94c99c772d
(file-truename): Undo last change.

diff -r 5122736c0a03 -r 615f7101473a lisp/files.el
--- a/lisp/files.el	Wed Apr 28 17:08:18 1993 +0000
+++ b/lisp/files.el	Wed Apr 28 17:33:42 1993 +0000
@@ -314,10 +314,7 @@
 both at the level of the file and at the level of the directories
 containing it, until no links are left at any level."
   (if (string= filename "~")
-      (progn
-	(setq filename (expand-file-name filename))
-	(if (string= filename "")
-	    (setq filename "/"))))
+      (setq filename (expand-file-name filename)))
   (let ((handler (find-file-name-handler filename)))
     ;; For file name that has a special handler, call handler.
     ;; This is so that ange-ftp can save time by doing a no-op.