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])!