--- a/BrowserView.st	Tue Feb 27 10:59:15 2018 +0100
+++ b/BrowserView.st	Thu Mar 01 10:46:16 2018 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -4115,11 +4117,9 @@
     "save a classes documentation html doc into a file"
 
     self generateClassDocumentationThenDo:[:text |
-        |f|
-
-        f := aFilename asFilename writeStream.
-        f nextPutAll:text asString.
-        f close.
+        aFilename asFilename writingFileDo:[:f |
+            f nextPutAll:text asString.
+        ].
     ]
 !
 
@@ -12484,7 +12484,7 @@
 
 extractClassAndSelectorFromSelectionInto:aBlock
     "given a string which can be either 
-        'class>>sel', 'class » sel'  or 'class sel', 
+        'class>>sel', 'class » sel'  or 'class sel', 
     extract className and selector, 
     and call aBlock with the result."