--- a/EncodedStream.st	Tue Aug 03 21:29:04 2004 +0200
+++ b/EncodedStream.st	Tue Aug 03 22:07:01 2004 +0200
@@ -70,7 +70,7 @@
 !
 
 cr
-    stream cr
+    self nextPutAll:(Character cr asString)
 !
 
 nextChunk
@@ -136,5 +136,5 @@
 !EncodedStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.9 2004-07-13 13:10:20 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/EncodedStream.st,v 1.10 2004-08-03 20:07:01 penk Exp $'
 ! !