Marcel Taeumel uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-mt.622.mcz

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

Name: Tools-mt.622
Author: mt
Time: 8 May 2015, 11:01:04.067 am
UUID: d6bbe089-6caa-bb48-8823-ac746a9fc3f1
Ancestors: Tools-mt.621

Fixed regression in Message Names tool. Support multi-line search pattern input again.

=============== Diff against Tools-mt.621 ===============

Item was changed:
  ----- Method: MessageNames>>buildSearchPaneWith: (in category 'toolbuilder') -----
  buildSearchPaneWith: builder
  	
  	| panelSpec textSpec buttonSpec |
  	panelSpec := builder pluggablePanelSpec new
  		layout: #horizontal;
  		children: OrderedCollection new;
  		yourself.
  
+ 	textSpec := builder pluggableTextSpec new.
- 	textSpec := builder pluggableInputFieldSpec new.
  	textSpec 
  		model: searchString;
  		help: 'Type here, then hit Search.' translated;
  		getText: #contents; 
  		setText: #contents:.
  	panelSpec children add: textSpec.
  		
  	buttonSpec := builder pluggableActionButtonSpec new.
  	buttonSpec 
  		model: self;
  		label: 'Search';
  		action: #doSearch;
  		horizontalResizing: #shrinkWrap.
  	panelSpec children add: buttonSpec.
  			
  	^ panelSpec!

Item was changed:
  ----- Method: MessageNames>>buildWith: (in category 'toolbuilder') -----
  buildWith: builder
  	"ToolBuilder open: MessageNames new"
  
  	| windowSpec max searchHeight |
  	max := self wantsOptionalButtons ifTrue:[0.42] ifFalse:[0.5].
  	searchHeight := Preferences standardDefaultTextFont height * 2.
  	
  	windowSpec := self buildWindowWith: builder specs: {
+ 		(0 at 0 corner: 0.5 at 0.1) -> [self buildSearchPaneWith: builder].
+ 		(0 at 0.1 corner: 0.5 @ max) -> [self buildSelectorListWith: builder].
- 		(self topConstantHeightFrame: searchHeight fromLeft: 0 width: 0.5) -> [self buildSearchPaneWith: builder].
- 		(self frameOffsetFromTop: searchHeight fromLeft: 0 width: 0.5 bottomFraction: max) -> [self buildSelectorListWith: builder].
  		(0.5 at 0.0 corner: 1.0 at max) -> [self buildMessageListWith: builder].
  		(0 at max corner: 1 at 1) -> [self buildCodePaneWith: builder].
  	}.
  
  	^ builder build: windowSpec!