AspectAdaptor.st
changeset 448 5a9fb44b4a3f
parent 439 00d7fa5cf3f0
child 789 98a12d3c3bee
--- a/AspectAdaptor.st	Mon Feb 24 20:50:19 1997 +0100
+++ b/AspectAdaptor.st	Mon Feb 24 21:11:46 1997 +0100
@@ -274,17 +274,14 @@
     "translate an update from the model into a #value-change
      via my depenedents ..."
 
-    ((changedObject == subject)
+    ((changedObject == subject and:[something == self forAspect])
     or:[changedObject == subjectChannel]) ifTrue:[
-        something == self forAspect ifTrue:[
-            self changed:#value
-        ].
-        ^ self
+        self changed:#value
     ].
 ! !
 
 !AspectAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AspectAdaptor.st,v 1.18 1997-02-20 15:31:21 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/AspectAdaptor.st,v 1.19 1997-02-24 20:11:46 ca Exp $'
 ! !