#TUNING by cg
authorClaus Gittinger <cg@exept.de>
Tue, 24 Jan 2017 23:24:05 +0100
changeset 6059 862a2c65691b
parent 6058 e844c95ec8c2
child 6060 fcd81f4fe76c
#TUNING by cg class: TextView changed: #clearMarginOfVisibleLine:with: draw by sending messages to gc instead of self. (new GC structure)
TextView.st
--- a/TextView.st	Tue Jan 24 23:17:27 2017 +0100
+++ b/TextView.st	Tue Jan 24 23:24:05 2017 +0100
@@ -3135,11 +3135,9 @@
 
     (leftMargin ~~ 0) ifTrue:[
         viewOrigin x <= margin ifTrue:[
-            self paint:color.
-            self fillRectangleX:margin-viewOrigin x
-                              y:(self yOfVisibleLine:visLine)- (lineSpacing//2)
-                          width:leftMargin
-                         height:fontHeight
+            gc paint:color.
+            gc fillRectangleX:(margin-viewOrigin) x y:(self yOfVisibleLine:visLine)- (lineSpacing//2)
+               width:leftMargin height:fontHeight
         ]
     ]