Mercurial > hg > xemacs-beta

comparison src/realpath.c @ 988:5df795348f45

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-09-01 22:13:52 by andyp] apply various 21.4 patches
author andyp
date Sun, 01 Sep 2002 22:14:58 +0000
parents 804517e16990
children 3bcd77d0bf93
comparison
equal deleted inserted replaced
987:7ffc86e44409 988:5df795348f45
214 214
215 if (0) 215 if (0)
216 ; 216 ;
217 #ifdef WIN32_FILENAMES 217 #ifdef WIN32_FILENAMES
218 /* Check for c:/... or //server/... */ 218 /* Check for c:/... or //server/... */
219 else if (abslen == 2 || abslen == 3) 219 else if (abslen == 3 || abslen == 2)
220 { 220 {
221 qxestrncpy (new_path, path, abslen);
222 /* Make sure drive letter is lowercased. */ 221 /* Make sure drive letter is lowercased. */
223 if (abslen == 3) 222 if (abslen == 3) {
224 *new_path = tolower (*new_path); 223 *new_path = tolower (*path);
225 new_path += abslen; 224 new_path++;
226 path += abslen; 225 path++;
226 abslen--;
227 }
228 /* Coerce directory chars. */
229 while (abslen-- > 0) {
230 if (IS_DIRECTORY_SEP (*path))
231 *new_path++ = DIRECTORY_SEP;
232 else
233 *new_path++ = *path;
234 path++;
235 }
227 } 236 }
228 #endif 237 #endif
229 #ifdef WIN32_NATIVE 238 #ifdef WIN32_NATIVE
230 /* No drive letter, but a beginning slash? Prepend drive letter. */ 239 /* No drive letter, but a beginning slash? Prepend drive letter. */
231 else if (abslen == 1) 240 else if (abslen == 1)