Fix in listOfMethodCategories for methods with nil category (non-smalltalk methods)
--- a/Tools_MethodCategoryList.st Wed Aug 31 19:00:57 2011 +0200
+++ b/Tools_MethodCategoryList.st Wed Aug 31 23:15:22 2011 +0200
@@ -1289,7 +1289,7 @@
]
].
mPackage ~~ classPackage ifTrue:[
- mPackage ~= PackageId noProjectID ifTrue:[
+ (mCategory notNil and:[mPackage ~= PackageId noProjectID]) ifTrue:[
itemsWithExtensions add:mCategory.
(packageFilter notNil
@@ -1492,6 +1492,7 @@
"Created: / 05-02-2000 / 13:42:11 / cg"
"Modified: / 18-08-2011 / 10:04:40 / cg"
+ "Modified: / 31-08-2011 / 16:26:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
makeDependent
@@ -1933,11 +1934,11 @@
!MethodCategoryList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.72 2011-08-25 10:19:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.73 2011-08-31 21:15:22 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.72 2011-08-25 10:19:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_MethodCategoryList.st,v 1.73 2011-08-31 21:15:22 vrany Exp $'
! !
MethodCategoryList initialize!