--- a/HistoryManager.st	Tue Jul 19 21:26:39 2011 +0200
+++ b/HistoryManager.st	Wed Jul 20 20:19:42 2011 +0200
@@ -409,6 +409,9 @@
 
     |selector oldMethod changedClass whatChange|
 
+    something == #methodCoverageInfo ifTrue:[^ self].
+    something == #methodTrap ifTrue:[^ self].
+
     "/
     "/ no action, if disabled
     "/
@@ -527,7 +530,7 @@
         whatChange == #classDefinition ifTrue:[
             "/ it is a class definition that has changed
             "/ add a line to the history method; if present
-            self updateAfterClassClassChange:'class definition' in:changedClass.
+            self updateAfterClassChange:'class definition' in:changedClass.
             ^self
         ].
     ].
@@ -997,7 +1000,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.79 2011-07-16 17:09:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.80 2011-07-20 18:19:42 cg Exp $'
 ! !
 
 !HistoryManager::HistoryLine class methodsFor:'filtering'!
@@ -1692,7 +1695,7 @@
 !HistoryManager class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.79 2011-07-16 17:09:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.80 2011-07-20 18:19:42 cg Exp $'
 ! !
 
 HistoryManager initialize!