--- a/CheckBox.st	Sat Oct 24 16:00:07 2009 +0200
+++ b/CheckBox.st	Sat Oct 24 16:00:47 2009 +0200
@@ -780,7 +780,7 @@
 
     super initialize.
 
-    self setBorderWidth:0.
+    self borderWidth:0.
     checkToggleClass := self defaultCheckToggleClass.
 
     hLayout := #fixLeftSpace.
@@ -794,7 +794,7 @@
     labelView := CheckLabel in:self.
     "/ a kludge
     styleSheet name ~~ #motif ifTrue:[
-        labelView label:'check'; setBorderWidth:0.
+        labelView label:'check'; borderWidth:0.
     ].
     labelView forceResize.
     labelView adjust:#left.
@@ -931,9 +931,9 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.82 2009-10-23 15:22:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.83 2009-10-24 14:00:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.82 2009-10-23 15:22:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.83 2009-10-24 14:00:47 cg Exp $'
 ! !