--- a/CheckToggle.st	Tue May 25 16:15:15 1999 +0200
+++ b/CheckToggle.st	Tue May 25 16:15:42 1999 +0200
@@ -545,15 +545,15 @@
             self paint:fgColor on:bgColor.
             self clippingRectangle:nil.
             self displayForm:logo x:labelOriginX y:labelOriginY.
-            self clippingRectangle:innerClipRect
+            self deviceClippingRectangle:innerClipRect
        ]
-    ]. 
+    ].
 
-    "Modified: 22.3.1997 / 18:23:50 / cg"
+    "Modified: / 25.5.1999 / 16:10:10 / cg"
 ! !
 
 !CheckToggle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.48 1999-04-24 14:37:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.49 1999-05-25 14:15:42 cg Exp $'
 ! !