Index: /branches/working-0711/ccl/level-1/linux-files.lisp
===================================================================
--- /branches/working-0711/ccl/level-1/linux-files.lisp	(revision 13043)
+++ /branches/working-0711/ccl/level-1/linux-files.lisp	(revision 13044)
@@ -714,5 +714,5 @@
                     (%null-ptr)
                     #$OPEN_EXISTING
-                    #$FILE_ATTRIBUTE_NORMAL
+                    #$FILE_FLAG_BACKUP_SEMANTICS
                     (%null-ptr))))
       (if (eql handle *windows-invalid-handle*)
Index: /branches/working-0711/ccl/lisp-kernel/windows-calls.c
===================================================================
--- /branches/working-0711/ccl/lisp-kernel/windows-calls.c	(revision 13043)
+++ /branches/working-0711/ccl/lisp-kernel/windows-calls.c	(revision 13044)
@@ -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;
   }