--- a/HistoryManager.st	Sat Nov 09 00:49:24 1996 +0100
+++ b/HistoryManager.st	Sat Nov 09 00:50:58 1996 +0100
@@ -370,15 +370,15 @@
     "append the historyLines to the source"
     wStream cr.
     histLines do: [:hl |
-       wStream nextPutAll:hl printString; cr.
+       wStream nextPutLine:hl printString.
     ].
 
-    ^wStream contents.
+    ^ wStream contents.
 
     "Modified: 11.8.1995 / 16:51:50 / robert"
     "Modified: 8.9.1995 / 17:55:38 / claus"
-    "Modified: 13.12.1995 / 14:07:03 / cg"
     "Created: 12.10.1996 / 20:33:35 / cg"
+    "Modified: 9.11.1996 / 00:41:51 / cg"
 !
 
 addHistory:what toHistoryMethodOf:aClass
@@ -555,6 +555,6 @@
 !HistoryManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.32 1996-10-27 14:13:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.33 1996-11-08 23:50:58 cg Exp $'
 ! !
 HistoryManager initialize!