Whoa, I can no longer simply press Return to search..?  How does the
"multi-line search pattern" work?

On Fri, May 8, 2015 at 4:01 AM,  <commits at source.squeak.org> wrote:
> 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!
>
>