--- a/TabView.st Sun Nov 02 18:56:48 1997 +0100
+++ b/TabView.st Sun Nov 02 19:28:49 1997 +0100
@@ -359,18 +359,14 @@
enableChannel:aValueHolderForBoolean
"set the valueHolder used for enable/disable
"
- enableChannel notNil ifTrue:[
- enableChannel removeDependent:self.
- ].
- enableChannel := aValueHolderForBoolean.
+
+ |prev|
- enableChannel notNil ifTrue:[
- enableChannel addDependent:self.
- ].
- self enabled:(enableChannel value).
+ prev := enableChannel.
+ enableChannel := aValueHolderForBoolean.
+ self setupChannel:aValueHolderForBoolean for:nil withOld:prev
-
-
+ "Modified: / 31.10.1997 / 14:48:59 / cg"
!
listHolder
@@ -1204,5 +1200,5 @@
!TabView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TabView.st,v 1.28 1997-10-29 16:12:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TabView.st,v 1.29 1997-11-02 18:28:49 cg Exp $'
! !