(Fexpand_file_name): When simplifying /foo/.., keep the initial slash.

1 files changed, 2 insertions, 0 deletions

diff --git a/src/fileio.c b/src/fileio.c
index a05a72e97bd..f5a800f6c16 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1386,6 +1386,8 @@ See also the function `substitute-in-file-name'.")
         {
           while (o != target && (--o) && !IS_DIRECTORY_SEP (*o))
             ;
+          if (o == target && IS_ANY_SEP (*o))
+            ++o;
           p += 3;
         }
       else