--- a/UISelectionPanel.st	Tue Jul 08 23:37:15 2014 +0200
+++ b/UISelectionPanel.st	Wed Jul 09 17:04:25 2014 +0200
@@ -2248,7 +2248,7 @@
 
     LabelList := self defaultListOfLabels asOrderedCollection.
     SelectorList := self defaultListOfSelectors asOrderedCollection.
-    HolderList := OrderedCollection withSize:(SelectorList size).
+    HolderList := OrderedCollection newWithSize:(SelectorList size).
     NextUniqueNumber := 1.
 
     UISelectionPanel