Mercurial > emacs
comparison src/fileio.c @ 4483:6894dd27c9ec
(expand_and_dir_to_file): Use Fdirectory_file_name.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 08 Aug 1993 05:17:22 +0000 |
parents | 73b91cd2c55e |
children | 1fc792473491 |
comparison
equal
deleted
inserted
replaced
4482:09d0f4b26641 | 4483:6894dd27c9ec |
---|---|
1524 #else | 1524 #else |
1525 /* Remove final slash, if any (unless path is root). | 1525 /* Remove final slash, if any (unless path is root). |
1526 stat behaves differently depending! */ | 1526 stat behaves differently depending! */ |
1527 if (XSTRING (abspath)->size > 1 | 1527 if (XSTRING (abspath)->size > 1 |
1528 && XSTRING (abspath)->data[XSTRING (abspath)->size - 1] == '/') | 1528 && XSTRING (abspath)->data[XSTRING (abspath)->size - 1] == '/') |
1529 abspath = Fsubstring (abspath, make_number (0), | 1529 /* We cannot take shortcuts; they might be wrong for magic file names. */ |
1530 make_number (XSTRING (abspath)->size - 1)); | 1530 abspath = Fdirectory_file_name (abspath); |
1531 #endif | 1531 #endif |
1532 return abspath; | 1532 return abspath; |
1533 } | 1533 } |
1534 | 1534 |
1535 barf_or_query_if_file_exists (absname, querystring, interactive) | 1535 barf_or_query_if_file_exists (absname, querystring, interactive) |