--- 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 $'
! !