#REFACTORING by stefan expecco_head_5844
authorStefan Vogel <sv@exept.de>
Fri, 31 Mar 2017 16:31:43 +0200
changeset 3946 3aa94b58d2b0
parent 3945 6219257414cf
child 3947 e620986b4e2a
#REFACTORING by stefan class: BlockValue changed: #setArguments:
BlockValue.st
--- a/BlockValue.st	Fri Mar 31 15:51:37 2017 +0200
+++ b/BlockValue.st	Fri Mar 31 16:31:43 2017 +0200
@@ -381,7 +381,7 @@
      block - possibly generating another change from myself"
 
     arguments notNil ifTrue:[
-        self release
+        arguments do:[:arg | arg removeDependent:self].
     ].
     arguments := aCollectionOfArguments.
     arguments do:[:arg |
@@ -393,6 +393,7 @@
     self recomputeValue.
 
     "Created: / 30-03-2017 / 14:00:27 / stefan"
+    "Modified: / 31-03-2017 / 16:28:39 / stefan"
 !
 
 setBlock:aBlock