--- a/ObjectView.st	Tue Jan 24 23:08:10 2017 +0100
+++ b/ObjectView.st	Tue Jan 24 23:14:59 2017 +0100
@@ -1138,16 +1138,16 @@
      Extracted into a separate method to allow easier redefinition
      (different lineWidth etc)"
 
-    self clippedByChildren:false.
-
-    self xoring:[
-        self lineWidth:0. 
+    gc clippedByChildren:false.
+
+    gc xoring:[
+        gc lineWidth:0. 
 "/        self lineStyle:#dashed.
-        self displayRectangle:dragObject.
+        gc displayRectangle:dragObject.
 "/        self lineStyle:#solid.
     ].
 
-    self clippedByChildren:true.
+    gc clippedByChildren:true.
 
     "Modified: 3.6.1996 / 10:02:22 / cg"
 !
@@ -2808,10 +2808,8 @@
 
     hsize := self handleSize.
     halfSize := hsize // 2.
-    self fillRectangleX:(aPoint x - halfSize)
-		      y:(aPoint y - halfSize)
-		  width:hsize 
-		 height:hsize
+    gc fillRectangleX:(aPoint x - halfSize) y:(aPoint y - halfSize)
+       width:hsize height:hsize
 !
 
 drawHandlesFor:anObject
@@ -2820,10 +2818,8 @@
     hsize := self handleSize.
     halfSize := hsize // 2.
     self handlesOf:anObject do:[:handlePoint |
-        self fillRectangleX:(handlePoint x - halfSize)
-                          y:(handlePoint y - halfSize)
-                      width:hsize 
-                     height:hsize
+        gc fillRectangleX:(handlePoint x - halfSize) y:(handlePoint y - halfSize)
+           width:hsize height:hsize
     ]
 !