Mercurial > emacs
changeset 15617:69c516d109e7
(DRIVE_LETTER) [WINDOWSNT]: Lower-case drive letters.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Sun, 07 Jul 1996 01:59:35 +0000 |
| parents | a73836346910 |
| children | 5da6a61ce827 |
| files | src/fileio.c |
| diffstat | 1 files changed, 4 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Sun Jul 07 01:59:28 1996 +0000 +++ b/src/fileio.c Sun Jul 07 01:59:35 1996 +0000 @@ -102,17 +102,15 @@ redirector allows the six letters between 'Z' and 'a' as well. */ #ifdef MSDOS #define IS_DRIVE(x) ((x) >= 'A' && (x) <= 'z') +#endif +#ifdef WINDOWSNT +#define IS_DRIVE(x) isalpha (x) +#endif /* Need to lower-case the drive letter, or else expanded filenames will sometimes compare inequal, because `expand-file-name' doesn't always down-case the drive letter. */ #define DRIVE_LETTER(x) (tolower (x)) #endif -#ifdef WINDOWSNT -#define IS_DRIVE(x) isalpha (x) -extern Lisp_Object Vwin32_downcase_file_names; -#define DRIVE_LETTER(x) (NILP (Vwin32_downcase_file_names) ? (x) : tolower (x)) -#endif -#endif #ifdef VMS #include <file.h>