The Trunk: ToolBuilder-Kernel-ct.136.mcz

Marcel Taeumel uploaded a new version of ToolBuilder-Kernel to project The Trunk:
http://source.squeak.org/trunk/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!