A new version of Tools was added to project The Inbox:
http://source.squeak.org/inbox/Tools-fbs.328.mcz==================== Summary ====================
Name: Tools-fbs.328
Author: fbs
Time: 24 March 2011, 8:35:37.437 am
UUID: dc079af3-2ece-f147-9fd6-26100f887fc5
Ancestors: Tools-fbs.327
A MessageSet may not have a class/metaclass selected when you click around the lists, unlike a Browser.
=============== Diff against Tools-fbs.327 ===============
Item was changed:
----- Method: MessageSet>>selectedMessageCategoryName (in category 'class list') -----
selectedMessageCategoryName
"Answer the name of the selected message category or nil."
+ | cls |
self hasMessageSelected ifFalse: [^ nil].
+ cls := self selectedClassOrMetaClass.
+
+ cls ifNil: [^ nil].
+
+ ^ cls organization categoryOfElement: self selectedMessageName!
- ^ self selectedClassOrMetaClass organization categoryOfElement: self selectedMessageName!