class: TextView
authorClaus Gittinger <cg@exept.de>
Fri, 16 Aug 2013 16:49:40 +0200
changeset 4667 7e25c2ca1182
parent 4666 81e48e442abe
child 4668 cced6c72d962
class: TextView changed: #clearMarginOfVisibleLine:with: selection redraw bug
TextView.st
--- a/TextView.st	Tue Aug 06 10:38:29 2013 +0200
+++ b/TextView.st	Fri Aug 16 16:49:40 2013 +0200
@@ -2805,7 +2805,7 @@
         viewOrigin x <= margin ifTrue:[
             self paint:color.
             self fillRectangleX:margin-viewOrigin x
-                              y:(self yOfVisibleLine:visLine)
+                              y:(self yOfVisibleLine:visLine)- (lineSpacing//2)
                           width:leftMargin
                          height:fontHeight
         ]
@@ -4843,11 +4843,11 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.358 2013-07-08 13:39:42 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.359 2013-08-16 14:49:40 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.358 2013-07-08 13:39:42 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.359 2013-08-16 14:49:40 cg Exp $'
 ! !