--- a/ExternalStream.st	Thu Sep 15 12:05:35 2011 +0100
+++ b/ExternalStream.st	Tue Sep 20 11:11:19 2011 +0100
@@ -1948,10 +1948,10 @@
     |elementSize n|
 
     elementSize := aContainer class elementByteSize.
-    n := self nextBytes:nElements*elementSize into:aContainer startingAt:index.
+    n := self nextBytes:nElements*elementSize into:aContainer startingAt:index*elementSize.
     ^ n // elementSize
 
-    "Modified: / 15-02-2011 / 11:04:22 / cg"
+    "Modified: / 15-09-2011 / 14:00:55 / cg"
 !
 
 readOnly
@@ -2438,14 +2438,20 @@
 
     "{ Pragma: +optSpace }"
 
-    ^ OpenError newException
+    |exClass|
+
+    exClass := (lastErrorNumber == (OperatingSystem errorNumberFor:#ERROR_FILE_NOT_FOUND))
+        ifTrue:[ FileDoesNotExistException ]
+        ifFalse:[ OpenError ].
+
+    ^ exClass newException
         errorCode:lastErrorNumber;
         errorString:(' : ' , (OperatingSystem errorTextForNumber:lastErrorNumber));
         parameter:self;
         raiseRequest
 
-    "Modified: / 28.1.1998 / 14:37:42 / stefan"
-    "Modified: / 8.5.1999 / 20:12:12 / cg"
+    "Modified: / 28-01-1998 / 14:37:42 / stefan"
+    "Modified: / 09-09-2011 / 09:16:40 / cg"
 !
 
 openError:errorNumber
@@ -2453,12 +2459,20 @@
 
     "{ Pragma: +optSpace }"
 
-    ^ OpenError newException
+    |exClass|
+
+    exClass := (errorNumber == OperatingSystem errorNumberFor:#ERROR_FILE_NOT_FOUND)
+        ifTrue:[ FileDoesNotExistException ]
+        ifFalse:[ OpenError ].
+
+    ^ exClass newException
         errorCode:errorNumber;
         errorString:(' : ' , (OperatingSystem errorTextForNumber:errorNumber));
         parameter:self;
         raiseRequest
         "/ in:thisContext sender
+
+    "Modified: / 09-09-2011 / 07:22:49 / cg"
 !
 
 readError
@@ -5692,11 +5706,12 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ExternalStream.st 10660 2011-07-18 15:22:09Z vranyj1 $'
+    ^ '$Id: ExternalStream.st 10690 2011-09-20 10:11:19Z vranyj1 $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.342 2011/02/15 10:04:34 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.344 2011/09/15 13:12:35 cg Exp §'
 ! !
 
 ExternalStream initialize!
+