[squeak-dev] The Trunk: Tools-ar.229.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Apr 22 04:12:58 UTC 2010


Andreas Raab uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-ar.229.mcz

==================== Summary ====================

Name: Tools-ar.229
Author: ar
Time: 21 April 2010, 9:12:21.923 pm
UUID: 54bb8957-8364-9346-89cd-b87e50f6ad77
Ancestors: Tools-ar.228, Tools-fbs.221

Merging Tools-fbs.221, Tools-fbs.220:

Allows the Browse button to work on class names that appear in the left-hand pane of a MessageNames browser.

Bug from ancestor: selectorListIndex can be nil, if the selectorList is empty.

=============== Diff against Tools-ar.228 ===============

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 isNil not and: [selectorListIndex > 0]) ifTrue: [^Smalltalk classNamed: (self selectorList at: selectorListIndex)].
+ 	
+ 	^ nil.
+ 	!




More information about the Squeak-dev mailing list