Eliot Miranda uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-eem.658.mcz
==================== Summary ====================
Name: Tools-eem.658 Author: eem Time: 6 December 2015, 12:20:40.433 pm UUID: 67c801aa-b3d5-4dc7-a52f-c49bbc7e0022 Ancestors: Tools-eem.657
Fix the mssageList one-element-selection regression in Tools-eem.657.
=============== Diff against Tools-eem.657 ===============
Item was changed: ----- Method: MessageNames>>selectorListIndex: (in category 'selector list') ----- selectorListIndex: anInteger "Set the selectorListIndex as specified, and propagate consequences" | methodClass index | methodClass := currentCompiledMethod ifNotNil: [currentCompiledMethod methodClass]. selectorListIndex := anInteger. self changed: #selectorListIndex.
messageList := self computeMessageList. self changed: #messageList. + messageList size > 1 ifTrue: + [methodClass ifNotNil: [index := messageList findFirst: [:methodRef| methodRef actualClass = methodClass]]]. - methodClass ifNotNil: [index := messageList findFirst: [:methodRef| methodRef actualClass = methodClass]].
"If a method of the same class exists, select that, otherwise select the first message if any." self messageListIndex: (index ifNil: [1 min: messageList size])!