--- a/HistoryManager.st	Sun Feb 23 10:56:34 2020 +0100
+++ b/HistoryManager.st	Sun Feb 23 13:23:18 2020 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1995 by AEG Industry Automation
  COPYRIGHT (c) 1995 by Claus Gittinger
@@ -829,10 +827,10 @@
 
     "create new method body with added historyLine"
     wStream := WriteStream on: (sourceCode species) new.
-    wStream nextPutAll: sourceCode; cr.
+    wStream nextPutAll:sourceCode.
 
     "append the historyLines to the source"
-    wStream cr.
+    wStream cr; cr.
     histLines do: [:hl |
        wStream nextPutLine:hl printString.
     ].