--- a/ButtonController.st Thu May 30 11:02:31 2019 +0200
+++ b/ButtonController.st Thu May 30 11:20:33 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
@@ -815,10 +817,12 @@
"release all dependencies"
enableChannel notNil ifTrue:[
- enableChannel retractInterestsFor:self.
+ enableChannel removeDependentAndRetractInterestsFor:self.
enableChannel := nil.
].
super release
+
+ "Modified: / 30-05-2019 / 11:15:17 / Claus Gittinger"
! !
!ButtonController class methodsFor:'documentation'!