Index: /trunk/source/lisp-kernel/windows-calls.c
===================================================================
--- /trunk/source/lisp-kernel/windows-calls.c	(revision 13024)
+++ /trunk/source/lisp-kernel/windows-calls.c	(revision 13025)
@@ -195,12 +195,9 @@
 
   if ((flag & _O_WRONLY) == _O_WRONLY) {
-    dwDesiredAccess |= GENERIC_WRITE | FILE_WRITE_DATA |
-      FILE_READ_ATTRIBUTES | FILE_WRITE_ATTRIBUTES;
+    dwDesiredAccess |= GENERIC_WRITE;
   } else if ((flag & _O_RDWR) == _O_RDWR) {
-    dwDesiredAccess |= GENERIC_WRITE|GENERIC_READ | FILE_READ_DATA |
-      FILE_WRITE_DATA | FILE_READ_ATTRIBUTES | FILE_WRITE_ATTRIBUTES;
+    dwDesiredAccess |= GENERIC_WRITE|GENERIC_READ;
   } else {
-    dwDesiredAccess |= GENERIC_READ | FILE_READ_DATA | FILE_READ_ATTRIBUTES |
-      FILE_WRITE_ATTRIBUTES;
+    dwDesiredAccess |= GENERIC_READ;
   }