changed: #setValue:
authorClaus Gittinger <cg@exept.de>
Wed, 20 Jan 2010 14:23:44 +0100
changeset 2816 a178bb3500fb
parent 2815 cb74506eb9e3
child 2817 f8b08ad94d28
changed: #setValue: must allow holder to send change notifications (in case it is shared)
IndirectValue.st
--- a/IndirectValue.st	Thu Dec 17 14:22:32 2009 +0100
+++ b/IndirectValue.st	Wed Jan 20 14:23:44 2010 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libview2' }"
 
 ValueModel subclass:#IndirectValue
@@ -87,7 +86,9 @@
 setValue:newValue 
     "physically set my value, without change notifications"
 
-    valueHolder setValue:newValue
+    valueHolder 
+        value:newValue
+        withoutNotifying:self
 !
 
 setValueHolder:aValueHolder
@@ -137,5 +138,9 @@
 !IndirectValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/IndirectValue.st,v 1.5 2004-12-16 11:45:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/IndirectValue.st,v 1.6 2010-01-20 13:23:44 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libview2/IndirectValue.st,v 1.6 2010-01-20 13:23:44 cg Exp $'
 ! !