Controller.st
changeset 1394 f40e168c528c
parent 1259 60af09384d13
child 1434 136173f28066
--- a/Controller.st	Fri Feb 28 19:52:16 1997 +0100
+++ b/Controller.st	Fri Feb 28 19:53:09 1997 +0100
@@ -207,11 +207,9 @@
 model:aModel
     "set my model"
 
-    model notNil ifTrue:[
-	model removeDependent:view
-    ].
     model := aModel.
-"/    model notNil ifTrue:[model addDependent:view]
+
+    "Modified: 28.2.1997 / 19:52:50 / cg"
 !
 
 sensor 
@@ -587,5 +585,5 @@
 !Controller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Controller.st,v 1.43 1997-01-21 14:46:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Controller.st,v 1.44 1997-02-28 18:53:09 cg Exp $'
 ! !