--- a/Tools_ClassList.st	Tue Apr 27 15:56:52 2010 +0200
+++ b/Tools_ClassList.st	Tue Apr 27 15:57:08 2010 +0200
@@ -1230,7 +1230,7 @@
 
                             nm := self nameListEntryFor:cls withNameSpace:showNamespaces.
 
-                            showCoverageInformationHolder value ifTrue:[
+                            self showCoverageInformationHolder value ifTrue:[
                                 emp := self emphasisForCoverageInformationOfClass:cls.
                                 emp notNil ifTrue:[
                                     nm := self colorize:nm with:emp
@@ -1309,7 +1309,7 @@
 
     ^ nameList
 
-    "Modified: / 27-04-2010 / 15:46:13 / cg"
+    "Modified: / 27-04-2010 / 15:54:41 / cg"
 !
 
 reconstructNameList
@@ -1727,9 +1727,9 @@
 !ClassList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.44 2010-04-27 13:52:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.45 2010-04-27 13:57:08 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.44 2010-04-27 13:52:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.45 2010-04-27 13:57:08 cg Exp $'
 ! !