--- a/SelectionInListView.st	Thu Mar 02 17:03:25 2000 +0100
+++ b/SelectionInListView.st	Tue Mar 21 11:48:00 2000 +0100
@@ -3656,7 +3656,8 @@
      *** No model and/or actionBlock notification is done here."
 
     self selectWithoutScroll:aNumberOrNil.
-    selection notNil ifTrue:[
+    ((multipleSelectOk and:[selection size > 0])
+    or:[multipleSelectOk not and:[selection notNil]]) ifTrue:[
         self makeSelectionVisible
     ]
 
@@ -3693,5 +3694,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.169 2000-02-24 18:20:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.170 2000-03-21 10:48:00 cg Exp $'
 ! !