--- a/SelectionInListModelView.st	Fri Oct 11 11:27:12 2002 +0200
+++ b/SelectionInListModelView.st	Fri Oct 11 11:31:13 2002 +0200
@@ -1237,7 +1237,7 @@
     "/ cg: I think it should not (see normal SelectionInListView, which does only
     "/     draw the frame at the top and bottom, but NOT at the left and right
     selection notNil ifTrue:[
-        selectionWasVisible := self isSelectionVisibleIn:previousExtent.
+        selectionWasVisible := self isSelectionVisibleIn:(previousExtent ? self extent).
 
         (hilightFrameColor notNil 
         or:[hilightStyle == #motif
@@ -1767,5 +1767,5 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.55 2002-10-11 09:27:12 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.56 2002-10-11 09:31:13 ca Exp $'
 ! !