--- a/ExternalStream.st	Tue Apr 29 20:15:33 2008 +0200
+++ b/ExternalStream.st	Tue Apr 29 20:32:41 2008 +0200
@@ -4817,7 +4817,7 @@
 #ifdef WIN32
     if (__isExternalAddressLike(anIntegerOrExternalAddress) ) {
         HANDLE __fileHandle = (HANDLE)(__externalAddressVal(anIntegerOrExternalAddress));
-        fd = _open_osfhandle(__fileHandle);
+        fd = _open_osfhandle(__fileHandle, 0);      /+ shoukld we handle about readonly, append ot text mode ?*/
     } else
 #endif
     if (__isSmallInteger(anIntegerOrExternalAddress)) {
@@ -5978,7 +5978,7 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.311 2008-04-29 18:00:33 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.312 2008-04-29 18:32:41 stefan Exp $'
 ! !
 
 ExternalStream initialize!