Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.176.mcz==================== Summary ====================
Name: ToolBuilder-Morphic-mt.176
Author: mt
Time: 1 August 2016, 2:44:38.851063 pm
UUID: 90acc5bd-1f6a-4f48-b1ac-d36a798437d4
Ancestors: ToolBuilder-Morphic-mt.175
For lists smaller than or equal to 7, use button-only dialog but still support keyboard filtering.
Note that people tend to choose between #(yes no) and hence we do need such a button-only version of a list chooser. Still, better than using menus in terms of input modality and visual consistency.
=============== Diff against ToolBuilder-Morphic-mt.175 ===============
Item was changed:
----- Method: MorphicUIManager>>chooseFrom:lines:title: (in category 'ui requests') -----
chooseFrom: aList lines: linesArray title: aString
"Choose an item from the given list. Answer the index of the selected item."
aList size <= 7 ifTrue: [
| dialog |
dialog := DialogWindow new
title: 'Please Choose';
message: aString;
+ filterEnabled: true;
yourself.
aList doWithIndex: [:ea :index |
dialog createButton: ea value: index].
dialog selectedButtonIndex: 1.
^ dialog getUserResponseAtHand ifNil: [0]].
^ ListChooser chooseFrom: aList title: aString!