--- a/SelectionInListView.st	Mon Nov 20 14:51:47 2000 +0100
+++ b/SelectionInListView.st	Tue Nov 21 15:36:41 2000 +0100
@@ -3590,6 +3590,14 @@
     |prevSelection newSelection|
 
     newSelection := aNumberOrNilOrCollection.
+    multipleSelectOk ifTrue:[
+        (newSelection notNil
+        and:[newSelection isNumber not]) ifTrue:[
+            newSelection := newSelection select:[:each | each notNil].
+            newSelection size == 0 ifTrue:[newSelection := nil].
+        ].
+    ].
+
     newSelection notNil ifTrue:[
         (self isValidSelection:newSelection) ifFalse:[
             newSelection := nil
@@ -3855,5 +3863,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.185 2000-09-30 15:12:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.186 2000-11-21 14:36:41 cg Exp $'
 ! !