--- a/SelectionInListModelView.st	Wed Mar 17 12:33:44 2010 +0100
+++ b/SelectionInListModelView.st	Thu Mar 18 11:35:04 2010 +0100
@@ -2324,15 +2324,13 @@
     "
     |firstLine|
 
-    shown ifFalse:[^ self].
-
     modelChangedDuringButtonPress notNil ifTrue:[^ self].
 
     firstLine := self firstInSelection.
     (firstLine isNil or:[firstLine == 0]) ifTrue:[^ self].
 
     self selectionDo:[:aLnNr|
-	(self lineIsFullyVisible:aLnNr) ifTrue:[^ self].
+        (self lineIsFullyVisible:aLnNr) ifTrue:[^ self].
     ].
     self makeLineVisible:(self firstInSelection).
 !
@@ -2634,9 +2632,9 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.149 2010-02-01 12:20:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.150 2010-03-18 10:35:04 fm Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.149 2010-02-01 12:20:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.150 2010-03-18 10:35:04 fm Exp $'
 ! !