--- a/TextView.st	Thu May 30 18:47:01 1996 +0200
+++ b/TextView.st	Fri May 31 09:26:38 1996 +0200
@@ -1088,18 +1088,6 @@
 
 !TextView methodsFor:'redrawing'!
 
-clearMarginOfVisible:visLine with:color
-    "if there is a margin, clear it - a helper for selection drawing"
-
-    (leftMargin ~~ 0) ifTrue:[
-	self paint:color.
-	self fillRectangleX:margin
-			  y:(self yOfVisibleLine:visLine)
-		      width:leftMargin
-		     height:fontHeight
-    ]
-!
-
 clearMarginOfVisibleLine:visLine with:color
     "if there is a margin, clear it - a helper for selection drawing"
 
@@ -2215,5 +2203,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.59 1996-05-30 15:48:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.60 1996-05-31 07:26:38 cg Exp $'
 ! !