--- a/HierarchicalListView.st	Tue Sep 28 19:01:21 1999 +0200
+++ b/HierarchicalListView.st	Wed Sep 29 07:02:35 1999 +0200
@@ -331,7 +331,7 @@
                 ^ self
             ]
         ].
-        self redrawX:x0 y:y0 width:x1 - x0 height:h.
+        self invalidateX:x0 y:y0 width:x1 - x0 height:h.
     ]
 
 
@@ -920,5 +920,5 @@
 !HierarchicalListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.11 1999-09-22 10:08:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalListView.st,v 1.12 1999-09-29 05:02:19 ca Exp $'
 ! !

--- a/ListModelView.st	Tue Sep 28 19:01:21 1999 +0200
+++ b/ListModelView.st	Wed Sep 29 07:02:35 1999 +0200
@@ -753,7 +753,7 @@
         y0 < yB ifTrue:[
             y1 := (self yVisibleOfLine:(aLineNr + 1)) min:yB.
             y1 > margin ifTrue:[
-                self redrawX:0 y:y0 width:width height:(y1 - y0)
+                self invalidateX:0 y:y0 width:width height:(y1 - y0)
             ]
         ]
     ]
@@ -1500,6 +1500,6 @@
 !ListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.26 1999-09-28 13:11:20 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.27 1999-09-29 05:02:35 ca Exp $'
 ! !
 ListModelView initialize!