--- a/SelectionInListView.st	Thu Nov 21 14:13:08 2002 +0100
+++ b/SelectionInListView.st	Thu Nov 28 11:09:47 2002 +0100
@@ -1717,7 +1717,7 @@
             selection add:aNumber
         ] ifFalse:[
             selection := selection asOrderedCollection.
-            selection := selection copyWith:aNumber
+            selection add:aNumber.
         ]
     ] ifFalse:[
         (aNumber == selection) ifTrue:[^ self].
@@ -3968,5 +3968,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.205 2002-10-11 13:09:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.206 2002-11-28 10:09:47 stefan Exp $'
 ! !