--- a/ProtAdptr.st Tue Apr 16 13:56:01 1996 +0200
+++ b/ProtAdptr.st Thu Apr 18 01:56:10 1996 +0200
@@ -11,10 +11,10 @@
"
ValueModel subclass:#ProtocolAdaptor
- instanceVariableNames:'accessPath subject subjectChannel subjectSendsUpdates'
- classVariableNames:''
- poolDictionaries:''
- category:'Interface-Support-Models'
+ instanceVariableNames:'accessPath subject subjectChannel subjectSendsUpdates'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Interface-Support-Models'
!
!ProtocolAdaptor class methodsFor:'documentation'!
@@ -107,11 +107,15 @@
!
subject:anObject sendsUpdates:aBoolean
- ^ (self new) subject:anObject; sendsUpdates:aBoolean
+ ^ (self new) subject:anObject; subjectSendsUpdates:aBoolean
+
+ "Modified: 18.4.1996 / 01:45:34 / cg"
!
subject:anObject sendsUpdates:aBoolean accessPath:aCollectionOfSelectors
- ^ (self new) subject:anObject; sendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+ ^ (self new) subject:anObject; subjectSendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+
+ "Modified: 18.4.1996 / 01:45:38 / cg"
!
subjectChannel:aValueHolder
@@ -123,11 +127,15 @@
!
subjectChannel:aValueHolder sendsUpdates:aBoolean
- ^ (self new) subjectChannel:aValueHolder; sendsUpdates:aBoolean
+ ^ (self new) subjectChannel:aValueHolder; subjectSendsUpdates:aBoolean
+
+ "Modified: 18.4.1996 / 01:45:45 / cg"
!
subjectChannel:aValueHolder sendsUpdates:aBoolean accessPath:aCollectionOfSelectors
- ^ (self new) subjectChannel:aValueHolder; sendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+ ^ (self new) subjectChannel:aValueHolder; subjectSendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+
+ "Modified: 18.4.1996 / 01:45:50 / cg"
! !
!ProtocolAdaptor methodsFor:'accessing'!
@@ -295,5 +303,5 @@
!ProtocolAdaptor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/Attic/ProtAdptr.st,v 1.9 1995-11-23 17:48:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Attic/ProtAdptr.st,v 1.10 1996-04-17 23:56:10 cg Exp $'
! !
--- a/ProtocolAdaptor.st Tue Apr 16 13:56:01 1996 +0200
+++ b/ProtocolAdaptor.st Thu Apr 18 01:56:10 1996 +0200
@@ -11,10 +11,10 @@
"
ValueModel subclass:#ProtocolAdaptor
- instanceVariableNames:'accessPath subject subjectChannel subjectSendsUpdates'
- classVariableNames:''
- poolDictionaries:''
- category:'Interface-Support-Models'
+ instanceVariableNames:'accessPath subject subjectChannel subjectSendsUpdates'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Interface-Support-Models'
!
!ProtocolAdaptor class methodsFor:'documentation'!
@@ -107,11 +107,15 @@
!
subject:anObject sendsUpdates:aBoolean
- ^ (self new) subject:anObject; sendsUpdates:aBoolean
+ ^ (self new) subject:anObject; subjectSendsUpdates:aBoolean
+
+ "Modified: 18.4.1996 / 01:45:34 / cg"
!
subject:anObject sendsUpdates:aBoolean accessPath:aCollectionOfSelectors
- ^ (self new) subject:anObject; sendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+ ^ (self new) subject:anObject; subjectSendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+
+ "Modified: 18.4.1996 / 01:45:38 / cg"
!
subjectChannel:aValueHolder
@@ -123,11 +127,15 @@
!
subjectChannel:aValueHolder sendsUpdates:aBoolean
- ^ (self new) subjectChannel:aValueHolder; sendsUpdates:aBoolean
+ ^ (self new) subjectChannel:aValueHolder; subjectSendsUpdates:aBoolean
+
+ "Modified: 18.4.1996 / 01:45:45 / cg"
!
subjectChannel:aValueHolder sendsUpdates:aBoolean accessPath:aCollectionOfSelectors
- ^ (self new) subjectChannel:aValueHolder; sendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+ ^ (self new) subjectChannel:aValueHolder; subjectSendsUpdates:aBoolean; accessPath:aCollectionOfSelectors
+
+ "Modified: 18.4.1996 / 01:45:50 / cg"
! !
!ProtocolAdaptor methodsFor:'accessing'!
@@ -295,5 +303,5 @@
!ProtocolAdaptor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/ProtocolAdaptor.st,v 1.9 1995-11-23 17:48:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ProtocolAdaptor.st,v 1.10 1996-04-17 23:56:10 cg Exp $'
! !