--- a/CheckBox.st	Fri Oct 23 11:28:54 2009 +0200
+++ b/CheckBox.st	Fri Oct 23 17:22:07 2009 +0200
@@ -780,7 +780,7 @@
 
     super initialize.
 
-    borderWidth := 0.
+    self setBorderWidth:0.
     checkToggleClass := self defaultCheckToggleClass.
 
     hLayout := #fixLeftSpace.
@@ -794,7 +794,7 @@
     labelView := CheckLabel in:self.
     "/ a kludge
     styleSheet name ~~ #motif ifTrue:[
-        labelView label:'check'; borderWidth:0.
+        labelView label:'check'; setBorderWidth:0.
     ].
     labelView forceResize.
     labelView adjust:#left.
@@ -931,5 +931,9 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.81 2008-10-26 20:09:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.82 2009-10-23 15:22:07 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.82 2009-10-23 15:22:07 cg Exp $'
 ! !