Mercurial > emacs
changeset 50886:85431fbc6ac5
(Ffile_symlink_p): Let handlers handle symlinks even
when system does not support them.
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Wed, 07 May 2003 22:13:04 +0000 |
parents | 97867a590ad4 |
children | 83d4a6cd8f62 |
files | src/fileio.c |
diffstat | 1 files changed, 8 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Wed May 07 22:12:02 2003 +0000 +++ b/src/fileio.c Wed May 07 22:13:04 2003 +0000 @@ -3192,11 +3192,6 @@ (filename) Lisp_Object filename; { -#ifdef S_IFLNK - char *buf; - int bufsize; - int valsize; - Lisp_Object val; Lisp_Object handler; CHECK_STRING (filename); @@ -3208,6 +3203,13 @@ if (!NILP (handler)) return call2 (handler, Qfile_symlink_p, filename); +#ifdef S_IFLNK + { + char *buf; + int bufsize; + int valsize; + Lisp_Object val; + filename = ENCODE_FILE (filename); bufsize = 50; @@ -3242,6 +3244,7 @@ xfree (buf); val = DECODE_FILE (val); return val; + } #else /* not S_IFLNK */ return Qnil; #endif /* not S_IFLNK */