Chris Muller uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-cmm.341.mcz

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

Name: Tools-cmm.341
Author: cmm
Time: 17 April 2011, 3:20:07.96 pm
UUID: 0c4e52aa-e8e2-4fa4-a115-f1bd35ec6667
Ancestors: Tools-ul.340

Reverted MessageSet>>messageListIndex: to fix auto-selection of search strings in MessageSets.

=============== Diff against Tools-ul.340 ===============

Item was changed:
  ----- Method: MessageSet>>messageListIndex: (in category 'message list') -----
+ messageListIndex: anInteger 
+ 	"Set the index of the selected item to be anInteger."
+ 
- messageListIndex: anInteger
- 	"Set the selected message selector to be the one indexed by anInteger."
  	messageListIndex := anInteger.
+ 	contents := 
+ 		messageListIndex ~= 0
+ 			ifTrue: [self selectedMessage]
+ 			ifFalse: [''].
+ 	self changed: #messageListIndex.	 "update my selection"
+ 	self editSelection: #editMessage.
- 	
- 	self editSelection: (anInteger > 0
- 		ifTrue: [#editMessage]
- 		ifFalse: [self messageCategoryListIndex > 0
- 			ifTrue: [#newMessage]
- 			ifFalse: [self hasClassSelected
- 				ifTrue: [#editClass]
- 				ifFalse: [#newClass]]]).
- 	contents := ''.
- 	self changed: #messageListIndex. "update my selection"
  	self contentsChanged.
+ 	(messageListIndex ~= 0 and: [ autoSelectString notNil and: [ self contents notEmpty ] ]) ifTrue: [ self changed: #autoSelect ].
+ 	self decorateButtons
+ !
- 	self decorateButtons.!