#TUNING by cg draft
authorClaus Gittinger <cg@exept.de>
Tue, 24 Jan 2017 23:34:01 +0100
changeset 3386 5baabc41e189
parent 3385 5307c299118d
child 3387 462d9e0dea1f
#TUNING by cg class: UIPainter draw by sending messages to gc instead of self. (new GC structure)
UIPainter.st
--- a/UIPainter.st	Tue Jan 24 23:32:39 2017 +0100
+++ b/UIPainter.st	Tue Jan 24 23:34:01 2017 +0100
@@ -7084,11 +7084,9 @@
 
     ((selection size > 1) and: [selection first == anIndex]) ifTrue:[
         dX := textInset - 1.
-        self paint:(Color red). "/ self application painter handleMasterColor.
-        self fillRectangleX:(x - dX - 2)
-                          y:yTop + ((fontHeight - dX) // 2)
-                      width:dX
-                     height:dX
+        gc paint:(Color red). "/ self application painter handleMasterColor.
+        gc fillRectangleX:(x - dX - 2) y:yTop + ((fontHeight - dX) // 2)
+           width:dX height:dX
     ]
 ! !