Mercurial Mercurial > hg > stx-libview / 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.
#DOCUMENTATION by cg expecco_2_11_0
authorClaus Gittinger <cg@exept.de>
Sat, 21 Jan 2017 04:04:02 +0100
changeset 7779 5931d9c57148
parent 7778 b88c63d76636
child 7780 4221620dd940
child 7975 8db05a559494
#DOCUMENTATION by cg class: SimpleView changed: #controller:
SimpleView.st file | annotate | diff | comparison | revisions 
--- a/SimpleView.st	Fri Jan 20 23:06:27 2017 +0100
+++ b/SimpleView.st	Sat Jan 21 04:04:02 2017 +0100
@@ -4196,9 +4196,13 @@
 controller:aController
     "set the controller - that's the one handling user events"
 
-    controller := aController.
-    controller notNil ifTrue:[
-	controller view:self.
+    aController == self ifTrue:[
+        controller := nil
+    ] ifFalse:[    
+        controller := aController.
+        controller notNil ifTrue:[
+            controller view:self.
+        ]
     ]
 
     "Modified: / 31.10.1997 / 19:58:33 / cg"
hg/stx-libview