equal
deleted
inserted
replaced
1089 enforceClassAndProtocolInList := true |
1089 enforceClassAndProtocolInList := true |
1090 ] ifFalse:[ |
1090 ] ifFalse:[ |
1091 cls notNil ifTrue:[ |
1091 cls notNil ifTrue:[ |
1092 allClasses add:cls. |
1092 allClasses add:cls. |
1093 ]. |
1093 ]. |
1094 "/ cat notNil ifTrue:[ |
|
1095 "/ allCategories add:cat. |
|
1096 "/ ]. |
|
1097 "/ JV: Filter method through package filter |
1094 "/ JV: Filter method through package filter |
1098 "/ but not, if it is an extension method and we are showing extensions |
1095 "/ but not, if it is an extension method and we are showing extensions |
1099 (mthd notNil |
1096 (mthd notNil |
1100 and:[ (mthd isSynthetic not or:[showSyntheticMethods value == true]) |
1097 and:[ (mthd isSynthetic not or:[showSyntheticMethods value == true]) |
1101 and:[ sel notNil ]] |
1098 and:[ sel notNil ]] |
1730 ]. |
1727 ]. |
1731 ]. |
1728 ]. |
1732 ]. |
1729 ]. |
1733 icn isNil ifTrue:[ |
1730 icn isNil ifTrue:[ |
1734 (selector isSymbol and:[selector startsWith:'test']) ifTrue:[ |
1731 (selector isSymbol and:[selector startsWith:'test']) ifTrue:[ |
1735 ((cls isSubclassOf:TestCase) |
1732 (((cls isSubclassOf:TestCase) and:[cls isAbstract not]) |
1736 and:[cls isAbstract not]) ifTrue:[ |
1733 or:[showSyntheticMethods value and:[aMethod isSynthetic]]) ifTrue:[ |
1737 "JV@2011-11-17: Show thumbs even if not all test were run" |
1734 "JV@2011-11-17: Show thumbs even if not all test were run" |
1738 |
1735 |
1739 lastResultOrNil := cls rememberedOutcomeFor:selector. |
1736 lastResultOrNil := cls rememberedOutcomeFor:selector. |
1740 lastResultOrNil notNil ifTrue:[ |
1737 lastResultOrNil notNil ifTrue:[ |
1741 |state| |
1738 |state| |
1910 ! ! |
1907 ! ! |
1911 |
1908 |
1912 !MethodList class methodsFor:'documentation'! |
1909 !MethodList class methodsFor:'documentation'! |
1913 |
1910 |
1914 version |
1911 version |
1915 ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.117 2015-02-25 16:11:15 vrany Exp $' |
1912 ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.118 2015-02-26 03:58:57 cg Exp $' |
1916 ! |
1913 ! |
1917 |
1914 |
1918 version_CVS |
1915 version_CVS |
1919 ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.117 2015-02-25 16:11:15 vrany Exp $' |
1916 ^ '$Header: /cvs/stx/stx/libtool/Tools__MethodList.st,v 1.118 2015-02-26 03:58:57 cg Exp $' |
1920 ! ! |
1917 ! ! |
1921 |
1918 |