# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 735947981 0
# Node ID 5457416cd8170b7eddeefb4ec20f8bda033e5547
# Parent  2e57e16282f03c65f14700b37b44573799db1871
(file-truename): Do the right thing when /home/gp2/eric = "".

diff -r 2e57e16282f0 -r 5457416cd817 lisp/files.el
--- a/lisp/files.el	Tue Apr 27 21:59:39 1993 +0000
+++ b/lisp/files.el	Tue Apr 27 21:59:41 1993 +0000
@@ -314,7 +314,10 @@
 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 "~")
-      (setq filename (expand-file-name filename)))
+      (progn
+	(setq filename (expand-file-name filename))
+	(if (string= filename "")
+	    (setq 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.