--- a/SelectionInListModelView.st	Wed Aug 21 18:27:35 2002 +0200
+++ b/SelectionInListModelView.st	Wed Aug 21 20:24:42 2002 +0200
@@ -749,8 +749,7 @@
         x0 := 0.
         x1 := width.
     ].
-    self invalidateX:x0 y:y0 width:(x1 - x0) height:(y1 - y0).
-
+    self invalidateX:x0 y:y0 width:(x1 - x0) height:(y1 - y0+1).
 ! !
 
 !SelectionInListModelView methodsFor:'event handling'!
@@ -1662,5 +1661,5 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.47 2002-08-02 12:01:27 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.48 2002-08-21 18:24:42 cg Exp $'
 ! !