Tools__MethodList.st
branchjv
changeset 16074 c2698f7a8a6d
parent 16066 471853fc1521
parent 16069 3b6e91bd072c
child 16156 9b9fa51009d2
--- a/Tools__MethodList.st	Sat Jan 23 06:59:30 2016 +0100
+++ b/Tools__MethodList.st	Sun Jan 24 06:56:35 2016 +0100
@@ -1733,9 +1733,10 @@
         ].
     ].
     icn isNil ifTrue:[
-        (selector isSymbol and:[selector startsWith:'test']) ifTrue:[
-            (((cls isSubclassOf:TestCase) and:[cls isAbstract not])
-            or:[showSyntheticMethods value and:[aMethod isSynthetic]]) ifTrue:[
+        "/ (selector isSymbol and:[selector startsWith:'test']) ifTrue:[
+        (((cls isSubclassOf:TestCase) and:[cls isAbstract not])
+        or:[showSyntheticMethods value and:[aMethod isSynthetic]]) ifTrue:[
+            (cls isTestSelector:selector) ifTrue:[
                 "JV@2011-11-17: Show thumbs even if not all test were run"
 
                 lastResultOrNil := cls rememberedOutcomeFor:selector.