--- 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 $'
! !