Marcel Taeumel uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-mt.610.mcz==================== Summary ====================
Name: Monticello-mt.610
Author: mt
Time: 7 April 2015, 6:43:41.185 pm
UUID: 2ecec5d8-703e-1d49-995d-afe7f11e69b2
Ancestors: Monticello-tfel.609
Introduced the possibility to offer one-line input fields in the MC tool builder.
Used it in the save-version dialog.
=============== Diff against Monticello-tfel.609 ===============
Item was changed:
----- Method: MCSaveVersionDialog>>widgetSpecs (in category 'ui') -----
widgetSpecs
^ #(
((listMorph:selection:menu:keystroke: list selection methodListMenu: methodListKey:from:) (0 0 0.5 0.6) (0 0 0 -47) )
+ ((inputMorph: versionName) (0.5 0 1 0) (0 0 0 30))
- ((textMorph: versionName) (0.5 0 1 0) (0 0 0 30))
((textMorph: logMessage) (0.5 0 1 0.6) (0 30 0 -47))
((buttonRow) (0.5 0.6 1 0.6) (0 -47 0 0))
((textMorph: annotations) (0 0.6 0.5 0.6) (0 -47 0 0))
((textMorph: text) (0 0.6 1 1) (0 0 0 0))
)!
Item was added:
+ ----- Method: MCToolWindowBuilder>>inputMorph: (in category 'as yet unclassified') -----
+ inputMorph: aSymbol
+ | text |
+ text := builder pluggableInputFieldSpec new.
+ text
+ model: tool;
+ getText: aSymbol;
+ setText: (aSymbol, ':') asSymbol;
+ frame: currentFrame.
+ window children add: text!