--- a/FileBrowser.st	Wed Mar 25 15:20:09 2015 +0100
+++ b/FileBrowser.st	Wed Mar 25 20:20:05 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1991 by Claus Gittinger
               All Rights Reserved
@@ -6300,13 +6302,13 @@
         "/ must do it lineWise ...
         someText asStringCollection do:[:line |
             line notNil ifTrue:[
-                stream nextPutAll:(encoder encodeString:line)
+                encoder encodeString:line on:stream
             ].
             stream cr
         ]
     ] ifFalse:[
         (someText isString) ifTrue:[
-            stream nextPutAll:(encoder encodeString:someText).
+            encoder encodeString:someText on:stream.
         ] ifFalse:[
             "/
             "/ on some systems, writing linewise is very slow (via NFS)
@@ -6316,10 +6318,11 @@
             startNr := 1.
             nLines := someText size.
             [startNr <= nLines] whileTrue:[
-                string := someText asStringWithCRsFrom:startNr
-                                                    to:((startNr + 1000) min:nLines)
-                                          compressTabs:compressTabs.
-                stream nextPutAll:(encoder encodeString:string).
+                string := someText 
+                                asStringWithCRsFrom:startNr
+                                to:((startNr + 1000) min:nLines)
+                                compressTabs:compressTabs.
+                encoder encodeString:string on:stream.
                 startNr := startNr + 1000 + 1.
             ].
         ].
@@ -7534,10 +7537,10 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.668 2015-02-24 11:49:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.669 2015-03-25 19:20:05 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.668 2015-02-24 11:49:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.669 2015-03-25 19:20:05 cg Exp $'
 ! !