methodsInCategory: aName
�� �� �� �� "Answer a list of the methods of the receiver that are in category named aName"

�� �� �� �� | aColl |
�� �� �� �� aColl := Set withAll: (self organization listAtCategoryNamed: aName).
�� �� �� �� ^ aColl asArray sort


allMethodsInCategory: aName
�� �� �� �� "Answer a list of all the methods of the receiver and all its
�� �� �� �� superclasses that are in the category named aName"

�� �� �� �� | aColl |
�� �� �� �� aColl := OrderedCollection new.
�� �� �� �� self withAllSuperclasses do: [:aClass |
�� �� �� �� �� �� �� �� aColl addAll: (aClass organization listAtCategoryNamed: aName) ].
�� �� �� �� ^ aColl asSet asArray sort


uncategorizedMethods
�� �� �� �� ^ self methodsInCategory: Protocol unclassified

all these methods returns selectors and not compiled methods.

So I would like to rename them accordingly.
What do you think?

Stef