--- a/FileStream.st	Fri Oct 26 11:55:43 2012 +0200
+++ b/FileStream.st	Fri Oct 26 11:56:21 2012 +0200
@@ -599,34 +599,6 @@
 
 !FileStream methodsFor:'error handling'!
 
-openError
-    "{ Pragma: +optSpace }"
-
-    "report an error, that file open failed"
-
-    "This has changed from previous releases:
-     in earlier versions of ST/X, failed file open operations
-     returned nil - now, an error is raised.
-     The old behavior is simulated by providing an exception
-     handler, which proceeds with nil:
-
-	OpenError ignoreIn:[
-	    'old code expecting nil return values on errors when doing an open'.
-
-	    ('/dasGIBtEsbeStimmtNiChT' asFilename readStream) isNil ifTrue:[
-		self warn:'open failed'.
-	    ].
-	]
-    "
-
-    LastErrorNumber := lastErrorNumber.
-    ^ super openError.
-
-    "
-     '/dasGIBtEsbeStimmtNiChT' asFilename readStream
-    "
-!
-
 openError:errorNumber
     "report an error, that file open failed"
 
@@ -1498,14 +1470,14 @@
 
     handle := self openFile:pathName withMode:openmode attributes:attributeSpec.
     handle isNil ifTrue:[
-	"
-	 the open failed for some reason ...
-	"
-	^ self openError
+        "
+         the open failed for some reason ...
+        "
+        ^ self openError:lastErrorNumber.
     ].
     position := ZeroPosition.
     buffered isNil ifTrue:[
-	buffered := true.       "default is buffered"
+        buffered := true.       "default is buffered"
     ].
 !
 
@@ -1711,11 +1683,11 @@
 !FileStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.146 2012-04-05 09:59:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.147 2012-10-26 09:56:21 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.146 2012-04-05 09:59:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.147 2012-10-26 09:56:21 stefan Exp $'
 ! !
 
 FileStream initialize!