Christoph Thiede uploaded a new version of ToolBuilder-Kernel to project The Inbox:
http://source.squeak.org/inbox/ToolBuilder-Kernel-ct.136.mcz==================== Summary ====================
Name: ToolBuilder-Kernel-ct.136
Author: ct
Time: 24 January 2020, 6:38:19.896574 pm
UUID: fcf254ff-5458-1c42-9499-d460f46e1ec8
Ancestors: ToolBuilder-Kernel-mt.134
Fixes a defect in UIManager's fallback implementation of #chooseFromOrAddTo:lines:title:: If we prepend an item to aList, we need to increment linesArray.
=============== Diff against ToolBuilder-Kernel-mt.134 ===============
Item was changed:
----- Method: UIManager>>chooseFromOrAddTo:lines:title: (in category 'ui requests') -----
chooseFromOrAddTo: aList lines: linesArray title: aString
+
| index |
+ index := self
+ chooseFrom: {'new...'}, aList
+ lines: linesArray + 1
+ title: aString.
- index := self chooseFrom: {'new...'}, aList lines: linesArray title: aString.
index = 0 ifTrue: [^ nil].
-
index = 1 ifTrue:
[^ self request: 'Please type new value' initialAnswer: ''].
-
^ aList at: index - 1!