From 01937013f02f575c4e343b8d62d516f37007a51b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 27 Feb 1996 16:51:25 +0000 Subject: [PATCH] (Fexpand_file_name): Fix confusion in detecting that default_directory is already absolute so need not be expanded. --- src/fileio.c | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/src/fileio.c b/src/fileio.c index 5ea29061950..221ef67cd8e 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -795,10 +795,15 @@ See also the function `substitute-in-file-name'.") The EQ test avoids infinite recursion. */ if (! NILP (default_directory) && !EQ (default_directory, name) - /* This saves time in a common case. */ + /* Save time in some common cases. */ +#ifdef DOS_NT + /* Detect MSDOS file names with device names. */ && ! (XSTRING (default_directory)->size >= 3 - && IS_DIRECTORY_SEP (XSTRING (default_directory)->data[0]) - && IS_DEVICE_SEP (XSTRING (default_directory)->data[1]))) + && IS_DEVICE_SEP (o[1]) && IS_DIRECTORY_SEP (o[2])) +#endif + /* Detect Unix absolute file names. */ + && ! (XSTRING (default_directory)->size >= 2 + && IS_DIRECTORY_SEP (o[0]))) { struct gcpro gcpro1; -- 2.39.5