mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 20:30:32 -08:00
Code Issues Projects Releases Wiki Activity

(Ffile_symlink_p): If result starts with a `/'

Browse source 
and contains a `:', prepend `/:'.
This commit is contained in:
Gerd Moellmann 2000-02-25 15:42:23 +00:00
parent 719eaeb1b6
commit 69ac18912e
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fileio.c
View file

@ -3022,6 +3022,8 @@ Otherwise returns nil.")
return Qnil;
}
val = make_string (buf, valsize);
if (buf[0] == '/' && index (buf, ':'))
val = concat2 (build_string ("/:"), val);
xfree (buf);
val = DECODE_FILE (val);
return val;