aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorGerd Moellmann2001-09-14 11:20:57 +0000
committerGerd Moellmann2001-09-14 11:20:57 +0000
commitbcdd93b35238000bc6195b9f59071b286575477b (patch)
tree817bd75c4893e18121643ba4c0b343c93072b60b /src
parent63680feb37911c14187ad5381689f3ab0b7b9bba (diff)
downloademacs-bcdd93b35238000bc6195b9f59071b286575477b.tar.gz
emacs-bcdd93b35238000bc6195b9f59071b286575477b.zip
(Ffile_symlink_p): Fix last change.
Diffstat (limited to 'src')
-rw-r--r--src/fileio.c15
1 files changed, 9 insertions, 6 deletions
diff --git a/src/fileio.c b/src/fileio.c
index eba2ac0bbaf..20b7079700e 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3106,15 +3106,18 @@ Otherwise returns nil.")
3106 3106
3107 errno = 0; 3107 errno = 0;
3108 valsize = readlink (XSTRING (filename)->data, buf, bufsize); 3108 valsize = readlink (XSTRING (filename)->data, buf, bufsize);
3109 if (valsize == -1 3109 if (valsize == -1)
3110 {
3110#ifdef ERANGE 3111#ifdef ERANGE
3111 /* HP-UX reports ERANGE if buffer is too small. */ 3112 /* HP-UX reports ERANGE if buffer is too small. */
3112 && errno != ERANGE 3113 if (errno == ERANGE)
3114 valsize = bufsize;
3115 else
3113#endif 3116#endif
3114 ) 3117 {
3115 { 3118 xfree (buf);
3116 xfree (buf); 3119 return Qnil;
3117 return Qnil; 3120 }
3118 } 3121 }
3119 } 3122 }
3120 while (valsize >= bufsize); 3123 while (valsize >= bufsize);