<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Exchange Server">
<!-- converted from text --><style><!-- .EmailQuote { margin-left: 1pt; padding-left: 4pt; border-left: #800000 2px solid; } --></style>
</head>
<body>
<meta content="text/html; charset=UTF-8">
<style type="text/css" style="">
<!--
p
{margin-top:0;
margin-bottom:0}
-->
</style>
<div dir="ltr">
<div id="x_divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:#000000; font-family:Calibri,Helvetica,sans-serif">
<p>Thank you! I wanted to pass objects into the #chooseFrom: recently and was disappointed that this apparently was not supported ... Glad it works again! :-)</p>
<p><br>
</p>
<p>Best,</p>
<p>Christoph</p>
</div>
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="x_divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>Von:</b> Squeak-dev <squeak-dev-bounces@lists.squeakfoundation.org> im Auftrag von commits@source.squeak.org <commits@source.squeak.org><br>
<b>Gesendet:</b> Donnerstag, 3. Februar 2022 17:14:02<br>
<b>An:</b> squeak-dev@lists.squeakfoundation.org; packages@lists.squeakfoundation.org<br>
<b>Betreff:</b> [squeak-dev] The Trunk: ToolBuilder-Morphic-mt.292.mcz</font>
<div> </div>
</div>
</div>
<font size="2"><span style="font-size:10pt;">
<div class="PlainText">Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.292.mcz">http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.292.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: ToolBuilder-Morphic-mt.292<br>
Author: mt<br>
Time: 3 February 2022, 5:14:01.689252 pm<br>
UUID: 9e44876c-0f30-4844-a9fe-55f0c4faae18<br>
Ancestors: ToolBuilder-Morphic-mt.291<br>
<br>
Fixes regression in list-chooser dialogs, which are not only for lists of strings but actual objects.<br>
<br>
Thanks to David O'Toole for reporting this!<br>
<br>
=============== Diff against ToolBuilder-Morphic-mt.291 ===============<br>
<br>
Item was changed:<br>
----- Method: ListChooser>>initialExtent (in category 'building') -----<br>
initialExtent<br>
<br>
| listFont itemCount maxItemSize cellSize |<br>
listFont := Preferences standardListFont.<br>
itemCount := items size.<br>
+ maxItemSize := items inject: 0 into: [:max :item | max max: item asString size].<br>
- maxItemSize := items inject: 0 into: [:max :item | max max: item size].<br>
cellSize := (listFont widthOf: $m) @ listFont height.<br>
<br>
^ ((maxItemSize min: 20 max: 10)<br>
@ (itemCount min: 15 max: 5)<br>
* cellSize) + (0@ self searchBarHeight)!<br>
<br>
Item was changed:<br>
----- Method: ListMultipleChooser>>initialExtent (in category 'toolbuilder') -----<br>
initialExtent<br>
<br>
| listFont itemCount maxItemSize cellSize |<br>
listFont := Preferences standardListFont.<br>
itemCount := labels size.<br>
+ maxItemSize := labels inject: 0 into: [:max :item | max max: item asString size].<br>
- maxItemSize := labels inject: 0 into: [:max :item | max max: item size].<br>
cellSize := (listFont widthOf: $m) @ listFont height.<br>
<br>
^ ((maxItemSize min: 20 max: 10)<br>
@ (itemCount min: 15 max: 5)<br>
* cellSize)!<br>
<br>
<br>
</div>
</span></font>
</body>
</html>