changed: #isOpen
authorStefan Vogel <sv@exept.de>
Thu, 04 Feb 2010 17:11:51 +0100
changeset 12690 1dab7b405304
parent 12689 834adbd43cc1
child 12691 b870ce93f973
changed: #isOpen not open if there is no parent stream
EncodedStream.st
--- a/EncodedStream.st	Thu Feb 04 16:49:53 2010 +0100
+++ b/EncodedStream.st	Thu Feb 04 17:11:51 2010 +0100
@@ -126,7 +126,7 @@
 !
 
 isOpen
-    ^ stream isOpen
+    ^ stream notNil and:[stream isOpen]
 !
 
 next
@@ -241,9 +241,9 @@
 !EncodedStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.17 2010-01-18 13:55:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.18 2010-02-04 16:11:51 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.17 2010-01-18 13:55:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.18 2010-02-04 16:11:51 stefan Exp $'
 ! !