CheckBox.st
changeset 114 bd13b6f557ea
parent 112 bb2cb6c553d2
child 115 0147e9d06caa
--- a/CheckBox.st	Fri Dec 15 13:24:13 1995 +0100
+++ b/CheckBox.st	Sun Dec 17 14:28:56 1995 +0100
@@ -316,6 +316,14 @@
     "Created: 22.9.1995 / 15:44:08 / claus"
 !
 
+disabledLabelForegroundColor
+    disabledLabelForegroundColor isNil ifTrue:[ ^ toggleView disabledForegroundColor ].
+    ^ disabledLabelForegroundColor
+
+    "Created: 16.12.1995 / 19:47:45 / cg"
+    "Modified: 16.12.1995 / 19:56:41 / cg"
+!
+
 font
     "forward from label"
 
@@ -346,6 +354,14 @@
     self resize.
 !
 
+labelForegroundColor
+    labelForegroundColor isNil ifTrue:[ ^ toggleView foregroundColor ].
+    ^ labelForegroundColor
+
+    "Created: 16.12.1995 / 19:47:20 / cg"
+    "Modified: 16.12.1995 / 19:56:57 / cg"
+!
+
 passiveLogo:anImageOrString
     toggleView passiveLogo:anImageOrString
 
@@ -449,5 +465,5 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.15 1995-12-14 13:55:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.16 1995-12-17 13:28:56 cg Exp $'
 ! !