--- a/SelectionInListView.st	Thu Oct 04 19:26:48 2001 +0200
+++ b/SelectionInListView.st	Fri Oct 05 10:56:34 2001 +0200
@@ -2130,7 +2130,7 @@
                 t emphasisAllRemove:#color.
                 self
                     drawLine:t 
-                    atX:(textStartLeft - leftOffset) 
+                    atX:(textStartLeft - viewOrigin x) 
                     inVisible:visLineNr 
                     with:fg 
                     and:bg
@@ -2143,7 +2143,7 @@
                     t := LabelAndIcon icon:item icon string:t.
                     self
                         drawLine:t 
-                        atX:(textStartLeft - leftOffset) 
+                        atX:(textStartLeft - viewOrigin x) 
                         inVisible:visLineNr 
                         with:fg 
                         and:bg
@@ -2188,8 +2188,8 @@
             includesNonStrings ifFalse:[
                 wEdge := wEdge max:(self widthOfContents).
             ].
-            self drawEdgesForX:(margin - leftOffset) y:y 
-                         width:wEdge+leftOffset height:fontHeight 
+            self drawEdgesForX:(margin - viewOrigin x) y:y 
+                         width:wEdge+viewOrigin x height:fontHeight 
                          level:hilightLevel.
 
 
@@ -4022,5 +4022,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.195 2001-09-28 13:25:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.196 2001-10-05 08:56:24 cg Exp $'
 ! !