--- a/EncodedStream.st	Fri Jan 19 14:44:37 2018 +0100
+++ b/EncodedStream.st	Fri Jan 19 14:44:53 2018 +0100
@@ -56,7 +56,13 @@
      |s|
      s := EncodedStream stream:Transcript encoder:(CharacterEncoder encoderToEncodeFrom:#utf8 into:#unicode).
      s nextPutAll:('öäü' utf8Encoded)
+
+     |s|
+     s := EncodedStream stream:('öäü' readStream) encoder:(CharacterEncoder encoderToEncodeFrom:#utf8 into:#unicode).
+     s next:3
     "
+
+    "Modified (comment): / 17-01-2018 / 13:36:28 / stefan"
 !
 
 stream:streamArg encoding:encodingSymbol
@@ -68,7 +74,11 @@
      s := EncodedStream stream:baseStream encoding:#utf8.
      s nextPutAll:'öäü'.
      baseStream reset; contents.
+
+     s contents
     "
+
+    "Modified (comment): / 17-01-2018 / 13:32:10 / stefan"
 ! !
 
 !EncodedStream class methodsFor:'Compatibility-VW5.4'!