--- a/ExternalStream.st	Sat Sep 14 13:41:23 2002 +0200
+++ b/ExternalStream.st	Tue Sep 17 11:10:06 2002 +0200
@@ -4322,7 +4322,7 @@
             ].
         ].
     ].
-
+    answerStream isNil ifTrue:[^ self contentsSpecies new].
     ^ answerStream contents
 
     "Created: 25.4.1996 / 14:40:31 / cg"
@@ -5743,6 +5743,6 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.241 2002-07-24 14:31:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.242 2002-09-17 09:10:06 cg Exp $'
 ! !
 ExternalStream initialize!