From eabf01d460f4c55fa323e3f4db50490d67f98bfb Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Thu, 29 Apr 1993 13:17:56 +0000
Subject: [PATCH] (Fexpand_file_name): Undo last change--too risky for now.

---
 src/fileio.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/fileio.c b/src/fileio.c
index 6c74dccc2ee..563726d1265 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -847,7 +847,10 @@ See also the function `substitute-in-file-name'.")
     {
       /* Get rid of any slash at the end of newdir.  */
       int length = strlen (newdir);
-      if (length > 1 && newdir[length - 1] == '/')
+      /* Adding `length > 1 &&' makes ~ expand into / when homedir
+	 is the root dir.  People disagree about whether that is right.
+	 Anyway, we can't take the risk of this change now.  */
+      if (newdir[length - 1] == '/')
 	{
 	  unsigned char *temp = (unsigned char *) alloca (length);
 	  bcopy (newdir, temp, length - 1);