Mercurial > emacs
comparison lib-src/etags.c @ 30969:1ccc2bce4062
(canonicalize_filename) [DOS_NT]: Upcase the first
letter only if it is a drive letter.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sun, 20 Aug 2000 08:29:25 +0000 |
parents | 5b3608e3adaf |
children | 9286b7ab7104 |
comparison
equal
deleted
inserted
replaced
30968:2dfd4d6a9043 | 30969:1ccc2bce4062 |
---|---|
5482 canonicalize_filename (fn) | 5482 canonicalize_filename (fn) |
5483 register char *fn; | 5483 register char *fn; |
5484 { | 5484 { |
5485 #ifdef DOS_NT | 5485 #ifdef DOS_NT |
5486 /* Canonicalize drive letter case. */ | 5486 /* Canonicalize drive letter case. */ |
5487 if (islower (fn[0])) | 5487 if (fn[0] && fn[1] == ':' && islower (fn[0])) |
5488 fn[0] = toupper (fn[0]); | 5488 fn[0] = toupper (fn[0]); |
5489 /* Convert backslashes to slashes. */ | 5489 /* Convert backslashes to slashes. */ |
5490 for (; *fn != '\0'; fn++) | 5490 for (; *fn != '\0'; fn++) |
5491 if (*fn == '\\') | 5491 if (*fn == '\\') |
5492 *fn = '/'; | 5492 *fn = '/'; |