Mercurial Mercurial > hg > stx-libview2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorca
Mon, 24 Feb 1997 21:11:46 +0100
changeset 448 5a9fb44b4a3f
parent 447 61b2307f3775
child 449 9d18c9a66b59
*** empty log message ***
AspctAdptr.st file | annotate | diff | comparison | revisions
AspectAdaptor.st file | annotate | diff | comparison | revisions 
--- a/AspctAdptr.st	Mon Feb 24 20:50:19 1997 +0100
+++ b/AspctAdptr.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/Attic/AspctAdptr.st,v 1.18 1997-02-20 15:31:21 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AspctAdptr.st,v 1.19 1997-02-24 20:11:46 ca Exp $'
 ! !
--- 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 $'
 ! !
hg/stx-libview2