--- a/HistoryManager.st	Fri Mar 01 16:00:51 2019 +0100
+++ b/HistoryManager.st	Sat Mar 02 14:21:46 2019 +0100
@@ -418,20 +418,18 @@
     "/
     "/ no action, if disabled
     "/
-    historyMode ifFalse:[
-        ^ self
-    ].
+    historyMode ifFalse:[ ^ self].
 
     "/
     "/ no action, if changeFile update is locked
     "/ (since then, this may be a recompile or fileIn)
     "/
     (Class updateChangeFileQuerySignal query) ifFalse:[ 
-"/        Transcript showCR: '* noChange in history'. 
+        "/ Transcript showCR: '* noChange in history'. 
         ^ self 
     ].
     Class updateHistoryLineQuerySignal query ifFalse:[ 
-"/        Transcript showCR: '* noChange in history'. 
+        "/ Transcript showCR: '* noChange in history'. 
         ^ self 
     ].
 
@@ -455,20 +453,11 @@
     "/ new Class creation
     "/
     ((changedObject == Smalltalk) and:[something == #newClass]) ifTrue:[
-        "/ 
-        "/  add myself as dependents in order to get future change notifications
-        "/ 
         fullHistoryUpdate == true ifTrue:[
             someArgument theMetaclass compilerClass == Compiler ifFalse:[^ self].
             self createHistoryMethodFor:someArgument.
             self addHistory:#creation with:nil toHistoryMethodOf:someArgument.
         ].
-
-        "/ claus: old implementation
-
-"/        someArgument addDependent: self.
-"/        someArgument class addDependent: self.   "for class methods"
-
         ^ self
     ].
 
@@ -542,6 +531,7 @@
     ^self
 
     "Created: / 30-06-2011 / 16:43:46 / cg"
+    "Modified (comment): / 02-03-2019 / 14:20:04 / Claus Gittinger"
 !
 
 updateAfterClassChange:whatChange in:aClass 
@@ -574,6 +564,7 @@
     (oldMethod notNil and:[oldMethod compilerClass ~~ Compiler]) ifTrue:[^ self].
 
     "/ ok; it is a changed method
+    (changedClass isMeta and:[oldMethod category = 'documentation']) ifTrue:[^ self]. 
 
     "/
     "/ fetch sourceString of the method
@@ -678,6 +669,7 @@
 
     "Created: / 30-06-2011 / 16:51:19 / cg"
     "Modified: / 02-10-2012 / 13:22:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 02-03-2019 / 14:16:04 / Claus Gittinger"
 ! !
 
 !HistoryManager methodsFor:'initialization'!