author | Claus Gittinger <cg@exept.de> |
Mon, 20 Feb 2006 22:30:50 +0100 | |
changeset 2009 | b919406a99f8 |
parent 2008 | a2906aabdbb1 |
child 2010 | f5f5a961cfa8 |
--- a/UISelectionPanel.st Fri Feb 17 13:06:30 2006 +0100 +++ b/UISelectionPanel.st Mon Feb 20 22:30:50 2006 +0100 @@ -1796,7 +1796,7 @@ LabelList := self defaultListOfLabels asOrderedCollection. SelectorList := self defaultListOfSelectors asOrderedCollection. - HolderList := OrderedCollection new grow:(SelectorList size). + HolderList := OrderedCollection withSize:(SelectorList size). NextUniqueNumber := 1. UISelectionPanel