--- a/ChckTggle.st Tue Apr 01 13:29:38 1997 +0200
+++ b/ChckTggle.st Tue Apr 01 13:36:24 1997 +0200
@@ -400,14 +400,16 @@
] ifFalse:[
logo := passiveLogo.
].
- controller entered ifTrue:[
+
+ (controller entered
+ and:[enteredBgColor notNil]) ifTrue:[
super drawWith:fg and:enteredBgColor
] ifFalse:[
super drawWith:fg and:bgColor "/ bg
]
"Modified: 22.9.1995 / 15:45:02 / claus"
- "Modified: 1.4.1997 / 13:26:56 / cg"
+ "Modified: 1.4.1997 / 13:35:48 / cg"
!
edgeDrawn:which
@@ -428,5 +430,5 @@
!CheckToggle class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.34 1997-04-01 11:28:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.35 1997-04-01 11:36:24 cg Exp $'
! !
--- a/CheckToggle.st Tue Apr 01 13:29:38 1997 +0200
+++ b/CheckToggle.st Tue Apr 01 13:36:24 1997 +0200
@@ -400,14 +400,16 @@
] ifFalse:[
logo := passiveLogo.
].
- controller entered ifTrue:[
+
+ (controller entered
+ and:[enteredBgColor notNil]) ifTrue:[
super drawWith:fg and:enteredBgColor
] ifFalse:[
super drawWith:fg and:bgColor "/ bg
]
"Modified: 22.9.1995 / 15:45:02 / claus"
- "Modified: 1.4.1997 / 13:26:56 / cg"
+ "Modified: 1.4.1997 / 13:35:48 / cg"
!
edgeDrawn:which
@@ -428,5 +430,5 @@
!CheckToggle class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.34 1997-04-01 11:28:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.35 1997-04-01 11:36:24 cg Exp $'
! !