CheckBox.st
changeset 3528 7ba2b9cfb354
parent 3479 c6e079059768
child 3569 0e01d084e624
--- a/CheckBox.st	Wed Aug 06 07:58:58 2008 +0200
+++ b/CheckBox.st	Fri Aug 08 11:40:22 2008 +0200
@@ -441,10 +441,11 @@
     ^labelView backgroundColor
 !
 
-backgroundColor: backgroundColor
-    "set backgroundColor only for the label view"
+backgroundColor:aColor
+    "set backgroundColor only for myself and the label view"
 
-    labelView backgroundColor: backgroundColor.
+    super backgroundColor:aColor.
+    labelView backgroundColor:aColor.
 !
 
 disabledLabelEtchedForegroundColor
@@ -928,5 +929,5 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.79 2008-07-18 08:55:46 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.80 2008-08-08 09:40:22 stefan Exp $'
 ! !