--- a/ChangesBrowser.st	Wed Sep 28 07:09:57 2016 +0200
+++ b/ChangesBrowser.st	Mon Oct 03 15:15:56 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
@@ -5181,7 +5183,7 @@
          get a prototype snapshot record (to be independent of
          the actual format ..
         "
-        str := WriteStream on:String new.
+        str := WriteStream on:''.
         Class addChangeRecordForSnapshot:'foo' to:str.
         snapshotProto := str contents.
         snapshotPrefix := snapshotProto copyTo:10.