# HG changeset patch # User Claus Gittinger # Date 1140471050 -3600 # Node ID b919406a99f8f101313cffa716891afeb57e4c4f # Parent a2906aabdbb15aa20ea49e26179075384864e6af *** empty log message *** diff -r a2906aabdbb1 -r b919406a99f8 UISelectionPanel.st --- 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