--- a/Tools_MethodList.st	Tue Mar 14 15:05:19 2006 +0100
+++ b/Tools_MethodList.st	Tue Mar 14 15:05:41 2006 +0100
@@ -368,7 +368,7 @@
                         (variableFilter value size > 0
                         or:[oldMethod package ~= newMethod package
                         or:[oldMethod resources ~= newMethod resources
-                        or:[showMethodComplexity value ~~ false]]]) ifTrue:[
+                        or:[showMethodComplexity value == true]]]) ifTrue:[
                             "/ only update that methods entry
                             self updateListEntryFor:newMethod.    
                             "/ sigh - must invalidate
@@ -1411,7 +1411,7 @@
         ]
     ].
 
-    (showMethodComplexity value ~~ false 
+    (showMethodComplexity value == true 
     and:[ OOM::MethodMetrics notNil ]) ifTrue:[
 icn isNil ifTrue:[
         metrics := OOM::MethodMetrics forMethod:aMethod.
@@ -1490,5 +1490,5 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.15 2006-03-10 09:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodList.st,v 1.16 2006-03-14 14:05:41 cg Exp $'
 ! !