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 */