--- a/SelectionInListView.st	Wed May 20 06:35:33 2015 +0200
+++ b/SelectionInListView.st	Thu May 21 06:57:52 2015 +0200
@@ -1272,9 +1272,7 @@
         listAttributes isNil ifTrue:[
             listAttributes := OrderedCollection newWithSize:index
         ] ifFalse:[
-            (index > listAttributes size) ifTrue:[
-                listAttributes grow:index
-            ]
+            listAttributes ensureSizeAtLeast:index.
         ].
         aSymbolOrCollectionOfSymbolsOrNil = (listAttributes at:index) ifFalse:[
             listAttributes at:index put:aSymbolOrCollectionOfSymbolsOrNil.
@@ -4192,11 +4190,11 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.285 2015-03-11 11:26:34 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.286 2015-05-20 10:28:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.285 2015-03-11 11:26:34 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.286 2015-05-20 10:28:24 cg Exp $'
 !
 
 version_HG