EncodedStream.st
branchjv
changeset 20578 39641ba8d6e0
parent 20398 8cb53f870d39
parent 20477 e293ff040ddc
child 23107 40173e082cbc
--- a/EncodedStream.st	Tue Sep 20 11:37:33 2016 +0100
+++ b/EncodedStream.st	Mon Oct 03 12:44:41 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2004 by eXept Software AG
               All Rights Reserved
@@ -55,7 +53,7 @@
     "
      |s|
      s := EncodedStream stream:Transcript encoder:(CharacterEncoder encoderToEncodeFrom:#utf8 into:#unicode).
-     s nextPutAll:('öäü' utf8Encoded)
+     s nextPutAll:('öäü' utf8Encoded)
     "
 !
 
@@ -66,7 +64,7 @@
      |baseStream s|
      baseStream := '' readWriteStream.
      s := EncodedStream stream:baseStream encoding:#utf8.
-     s nextPutAll:'öäü'.
+     s nextPutAll:'öäü'.
      baseStream reset; contents.
     "
 ! !
@@ -161,7 +159,7 @@
 !
 
 pathName
-    "if our base stream hat a pathname, delegate..."
+    "if our base stream has a pathname, delegate..."
 
     stream isNil ifTrue:[
         ^ nil.