# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1373322836 -7200
# Node ID 353aa0894d7d54bf9f017788ecb8b9c7933f1b76
# Parent  1b8acec57959e6aa8e7802917282923b457b4c11
class: ExternalStream
changed: #openError:
 fix FileDoesNotExistException generation

diff -r 1b8acec57959 -r 353aa0894d7d ExternalStream.st
--- a/ExternalStream.st	Tue Jul 09 00:17:30 2013 +0200
+++ b/ExternalStream.st	Tue Jul 09 00:33:56 2013 +0200
@@ -2456,9 +2456,10 @@
 
     "{ Pragma: +optSpace }"
 
-    |exClass|
-
-    exClass := ((OperatingSystem errorSymbolForNumber:errorNumber) == #ERROR_FILE_NOT_FOUND)
+    |exClass errorSymbol|
+
+    errorSymbol := OperatingSystem errorSymbolForNumber:errorNumber.
+    exClass := (errorSymbol == #ERROR_FILE_NOT_FOUND or:[errorSymbol == #ENOENT])
         ifTrue:[ FileDoesNotExistException ]
         ifFalse:[ OpenError ].
 
@@ -5761,11 +5762,11 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.369 2013-07-08 22:17:30 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.370 2013-07-08 22:33:56 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.369 2013-07-08 22:17:30 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.370 2013-07-08 22:33:56 stefan Exp $'
 ! !