Mercurial > hg > xemacs-beta

diff src/fileio.c @ 267:966663fcf606 r20-5b32

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b32
author cvs
date Mon, 13 Aug 2007 10:26:29 +0200
parents 8efd647ea9ca
children c5d627a313b1
line wrap: on
line diff
--- a/src/fileio.c	Mon Aug 13 10:25:39 2007 +0200
+++ b/src/fileio.c	Mon Aug 13 10:26:29 2007 +0200
@@ -2191,9 +2191,11 @@
 
 #ifdef WINDOWSNT
   /* Under MS-DOS and Windows, open does not work for directories.  */
+  UNGCPRO;
   if (access (XSTRING_DATA (abspath), 0) == 0)
     return Qt;
-  return Qnil;
+  else
+    return Qnil;
 #else /* not WINDOWSNT */
   {
     int desc = interruptible_open ((char *) XSTRING_DATA (abspath), O_RDONLY | OPEN_BINARY, 0);