--- 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 $'
 ! !