--- a/CheckToggle.st Wed Aug 18 17:06:39 1999 +0200
+++ b/CheckToggle.st Wed Aug 18 17:12:00 1999 +0200
@@ -234,7 +234,7 @@
Provided as public entry, to allow other views
to share the same check-image."
- ^ DefaultCheckForm on:aDevice.
+ ^ DefaultCheckForm onDevice:aDevice.
!
checkImageForStyle:aStyleSymbol
@@ -434,16 +434,6 @@
]
! !
-!CheckToggle ignoredMethodsFor:'event handling'!
-
-sizeChanged:how
- |prefExt|
-
- prefExt := self preferredExtent.
- width := prefExt x.
- height := prefExt y.
-! !
-
!CheckToggle methodsFor:'initialization'!
initStyle
@@ -583,5 +573,5 @@
!CheckToggle class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.52 1999-07-13 18:52:51 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/CheckToggle.st,v 1.53 1999-08-18 15:12:00 cg Exp $'
! !