--- a/Tools__MethodList.st	Thu Feb 26 04:58:30 2015 +0100
+++ b/Tools__MethodList.st	Thu Feb 26 04:58:57 2015 +0100
@@ -1091,9 +1091,6 @@
             cls notNil ifTrue:[
                 allClasses add:cls.
             ].
-"/            cat notNil ifTrue:[
-"/                allCategories add:cat.
-"/            ].
             "/ JV: Filter method through package filter
             "/ but not, if it is an extension method and we are showing extensions
             (mthd notNil
@@ -1732,8 +1729,8 @@
     ].
     icn isNil ifTrue:[
         (selector isSymbol and:[selector startsWith:'test']) ifTrue:[
-            ((cls isSubclassOf:TestCase)
-            and:[cls isAbstract not]) ifTrue:[
+            (((cls isSubclassOf:TestCase) and:[cls isAbstract not])
+            or:[showSyntheticMethods value and:[aMethod isSynthetic]]) ifTrue:[
                 "JV@2011-11-17: Show thumbs even if not all test were run"
 
                 lastResultOrNil := cls rememberedOutcomeFor:selector.
@@ -1912,10 +1909,10 @@
 !MethodList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.117 2015-02-25 16:11:15 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.118 2015-02-26 03:58:57 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.117 2015-02-25 16:11:15 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.118 2015-02-26 03:58:57 cg Exp $'
 ! !