--- a/TextView.st	Tue Jul 23 14:40:29 2002 +0200
+++ b/TextView.st	Tue Jul 23 17:29:50 2002 +0200
@@ -1965,11 +1965,11 @@
         with:selectionFgColor and:selectionBgColor.
 !
 
-drawVisibleLineSelected:visLineNr from:selectionStartCol to:selectionEndCol
+drawVisibleLineSelected:visLineNr from:startCol to:endCol
     self 
         drawLine:(self withoutAnyColorEmphasis:(self visibleAt:visLineNr))
         inVisible:visLineNr 
-        from:selectionStartCol to:selectionEndCol
+        from:startCol to:endCol
         with:selectionFgColor and:selectionBgColor.
 !
 
@@ -2069,7 +2069,7 @@
 redrawVisibleLine:visLineNr
     "redraw visible line lineNr"
 
-    |len line l|
+    |line|
 
     selectionStartLine notNil ifTrue:[
         line := self visibleLineToAbsoluteLine:visLineNr.
@@ -2104,8 +2104,6 @@
                 (selectionEndCol == 0) ifTrue:[
                     ^ super redrawVisibleLine:visLineNr
                 ].
-                l := self visibleAt:selectionEndLine.
-                len := l size.
 
                 self clearMarginOfVisibleLine:visLineNr with:selectionBgColor.
                 self drawVisibleLineSelected:visLineNr from:1 to:selectionEndCol.
@@ -3442,6 +3440,6 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.181 2002-07-23 12:40:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.182 2002-07-23 15:29:50 mb Exp $'
 ! !
 TextView initialize!