--- a/HistoryManager.st	Sat Jan 29 13:02:29 2011 +0100
+++ b/HistoryManager.st	Mon Jan 31 18:31:22 2011 +0100
@@ -249,12 +249,13 @@
     "create an initial (empty) history method"
 
     self obsoleteMethodWarning.
-    CodeGeneratorTool
+    SmalltalkCodeGeneratorTool
         compile:(self codeForInitialHistoryMethodIn:aClass)
         forClass:aClass 
         inCategory:'documentation'.
 
-    "Created: / 24.10.1997 / 02:41:43 / cg"
+    "Created: / 24-10-1997 / 02:41:43 / cg"
+    "Modified: / 31-01-2011 / 18:28:51 / cg"
 !
 
 getAllHistoriesFrom:someString
@@ -908,7 +909,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.72 2009-08-12 18:50:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.73 2011-01-31 17:31:22 cg Exp $'
 ! !
 
 !HistoryManager::HistoryLine class methodsFor:'filtering'!
@@ -1525,7 +1526,11 @@
 !HistoryManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.72 2009-08-12 18:50:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.73 2011-01-31 17:31:22 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.73 2011-01-31 17:31:22 cg Exp $'
 ! !
 
 HistoryManager initialize!