--- a/ChckTggle.st Tue Apr 01 13:28:08 1997 +0200
+++ b/ChckTggle.st Tue Apr 01 13:28:40 1997 +0200
@@ -396,13 +396,18 @@
drawWith:fg and:bg
controller pressed ifTrue:[
- logo := activeLogo.
+ logo := activeLogo.
] ifFalse:[
- logo := passiveLogo.
+ logo := passiveLogo.
].
- super drawWith:fg and:bg
+ controller entered 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"
!
edgeDrawn:which
@@ -423,5 +428,5 @@
!CheckToggle class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.33 1997-03-22 17:24:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/ChckTggle.st,v 1.34 1997-04-01 11:28:40 cg Exp $'
! !