[squeak-dev] The Inbox: Tools-fbs.220.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Mar 31 20:42:58 UTC 2010
A new version of Tools was added to project The Inbox:
http://source.squeak.org/inbox/Tools-fbs.220.mcz
==================== Summary ====================
Name: Tools-fbs.220
Author: fbs
Time: 31 March 2010, 10:42:28.8 pm
UUID: 0eca72cb-a1d4-4849-9da6-15d4b31ab9a4
Ancestors: Tools-fbs.219, Tools-nice.219
Allows the Browse button to work on class names that appear in the left-hand pane of a MessageNames browser.
=============== Diff against Tools-nice.219 ===============
Item was changed:
----- Method: MessageNames>>selection (in category 'selection') -----
selection
"Answer the item in the list that is currently selected, or nil if no selection is present"
+ ^ messageListIndex = 0
+ ifTrue: [self selectorList at: selectorListIndex ifAbsent: [nil]]
+ ifFalse: [self messageList at: messageListIndex ifAbsent: [nil]].!
- ^ self messageList at: messageListIndex ifAbsent: [nil]!
Item was added:
+ ----- Method: MessageNames>>selectedClassOrMetaClass (in category 'class list') -----
+ selectedClassOrMetaClass
+ "Answer the currently selected class (or metaclass)."
+ messageListIndex > 0 ifTrue: [
+ ^ self setClassAndSelectorIn: [:c :s | ^c]].
+ selectorListIndex > 0 ifTrue: [^Smalltalk classNamed: (self selectorList at: selectorListIndex)].
+
+ ^ nil.
+ !
More information about the Squeak-dev
mailing list
|