--- a/HistoryManager.st	Mon Oct 14 16:54:08 1996 +0200
+++ b/HistoryManager.st	Mon Oct 14 18:01:30 1996 +0200
@@ -418,12 +418,14 @@
         cls := aClass
     ].
 
-    Compiler
-        compile:'history' 
-        forClass:cls 
-        inCategory:'documentation'
+    Class updateChangeFileQuerySignal answer:false do:[
+        Compiler
+            compile:'history' 
+            forClass:cls 
+            inCategory:'documentation'
+    ].
 
-    "Modified: 12.10.1996 / 20:41:11 / cg"
+    "Modified: 14.10.1996 / 16:58:20 / cg"
 !
 
 update:something with:someArgument from:changedObject
@@ -553,6 +555,6 @@
 !HistoryManager  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.30 1996-10-12 19:48:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.31 1996-10-14 16:01:30 cg Exp $'
 ! !
 HistoryManager initialize!