--- a/Tools_ClassChecker.st	Wed Feb 05 20:08:44 2014 +0100
+++ b/Tools_ClassChecker.st	Wed Feb 05 20:08:47 2014 +0100
@@ -334,10 +334,10 @@
     selectorsOfInterest := IdentitySet new.
     checkedClass instAndClassSelectorsAndMethodsDo:[:mSelector :method |  selectorsOfInterest add:mSelector].
     (self messagesNeverSentAndNotUsedAsSymbolIn:selectorsOfInterest) do:[:eachNeverSent |
-        self 
-            rememberBadMethod:(checkedClass compiledMethodAt:eachNeverSent) ? (checkedClass class compiledMethodAt:eachNeverSent)
-            key:#messageNeverSentAndNotUsedAsSymbol
-            info:('#' , eachNeverSent allBold, ' is nowhere sent and selector-symbol not used in any method (#messageNeverSentAndNotUsedAsSymbol)')
+	self 
+	    rememberBadMethod:(checkedClass compiledMethodAt:eachNeverSent) 
+	    key:#messageNeverSentAndNotUsedAsSymbol
+	    info:('#' , eachNeverSent allBold, ' is nowhere sent and selector-symbol not used in any method (#messageNeverSentAndNotUsedAsSymbol)')
     ].
 
     "Modified: / 18.8.2000 / 23:10:56 / cg"
@@ -918,10 +918,10 @@
 !ClassChecker class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassChecker.st,v 1.19 2013-12-20 11:03:03 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassChecker.st,v 1.20 2014-02-05 19:08:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassChecker.st,v 1.19 2013-12-20 11:03:03 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassChecker.st,v 1.20 2014-02-05 19:08:47 cg Exp $'
 ! !