--- a/CheckToggle.st	Fri Jan 20 18:53:05 2017 +0100
+++ b/CheckToggle.st	Fri Jan 20 23:05:09 2017 +0100
@@ -728,7 +728,7 @@
     ].
     LabelOverMargin ifTrue:[
         (logo isNil or:[logo isImageOrForm not]) ifTrue:[
-            self deviceClippingRectangle:nil.
+            self deviceClippingBounds:nil.
             self clearRectangleX:0 y:0 width:width height:height.
         ].
     ].