# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 744787042 0
# Node ID 6894dd27c9ecd215124f71ae7969cdc164f2e122
# Parent  09d0f4b26641b0bc621ac8d448d2dee267e21ef1
(expand_and_dir_to_file): Use Fdirectory_file_name.

diff -r 09d0f4b26641 -r 6894dd27c9ec src/fileio.c
--- a/src/fileio.c	Sun Aug 08 05:01:06 1993 +0000
+++ b/src/fileio.c	Sun Aug 08 05:17:22 1993 +0000
@@ -1526,8 +1526,8 @@
      stat behaves differently depending!  */
   if (XSTRING (abspath)->size > 1
       && XSTRING (abspath)->data[XSTRING (abspath)->size - 1] == '/')
-    abspath = Fsubstring (abspath, make_number (0),
-			  make_number (XSTRING (abspath)->size - 1));
+    /* We cannot take shortcuts; they might be wrong for magic file names.  */
+    abspath = Fdirectory_file_name (abspath);
 #endif
   return abspath;
 }