--- a/Toggle.st Mon Mar 09 22:22:56 1998 +0100
+++ b/Toggle.st Mon Mar 09 22:25:07 1998 +0100
@@ -424,8 +424,7 @@
update:something with:parameter from:changedObject
something == aspectMsg ifTrue:[
- self getValueFromModel.
- ^ self
+ self getValueFromModel.
].
super update:something with:parameter from:changedObject
! !
@@ -611,5 +610,5 @@
!Toggle class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.40 1998-03-05 12:35:51 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.41 1998-03-09 21:25:07 tz Exp $'
! !