Mercurial > emacs
comparison src/fileio.c @ 27870:a36c3e02f43b
(Ffile_symlink_p): If result starts with a `/'
and contains a `:', prepend `/:'.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 25 Feb 2000 15:42:23 +0000 |
parents | eb273bf5c3a8 |
children | 8ef4ce88fa64 |
comparison
equal
deleted
inserted
replaced
27869:1322db65a230 | 27870:a36c3e02f43b |
---|---|
3020 { | 3020 { |
3021 xfree (buf); | 3021 xfree (buf); |
3022 return Qnil; | 3022 return Qnil; |
3023 } | 3023 } |
3024 val = make_string (buf, valsize); | 3024 val = make_string (buf, valsize); |
3025 if (buf[0] == '/' && index (buf, ':')) | |
3026 val = concat2 (build_string ("/:"), val); | |
3025 xfree (buf); | 3027 xfree (buf); |
3026 val = DECODE_FILE (val); | 3028 val = DECODE_FILE (val); |
3027 return val; | 3029 return val; |
3028 #else /* not S_IFLNK */ | 3030 #else /* not S_IFLNK */ |
3029 return Qnil; | 3031 return Qnil; |