How do I get all classnames in a category?
Jason Rogers
jacaetevha at gmail.com
Thu Nov 17 20:04:03 UTC 2005
On 11/17/05, Marcus Pedersén <marcus.pedersen at comhem.se> wrote:
>
> Hi!
> How do I get all classnames in a specific category, codewise?
> I am after something like:
> Categories classnamesInCategory: 'My Category'.
> ...and I want a collection returned with all classnames in that category.
>
> Many thanks in advance!
| category classNames |
category := 'Foo*'.
classNames := OrderedCollection new.
SystemOrganization categories withIndexCollect: [:cat :idx |
(category match: cat)
ifTrue: [classNames addAll: (SystemOrganization
listAtCategoryNumber: idx)]
ifFalse: [nil]].
classNames explore.
--
Jason Rogers
"I am crucified with Christ: nevertheless I live; yet not I,
but Christ liveth in me: and the life which I now live in
the flesh I live by the faith of the Son of God, who loved
me, and gave himself for me."
Galatians 2:20
More information about the Squeak-dev
mailing list
|