class: Tools::ViewTreeInspectorApplication
authorClaus Gittinger <cg@exept.de>
Tue, 23 Jun 2015 15:41:27 +0200
changeset 3217 af9fd0c681e0
parent 3216 41118d54b47c
child 3218 16b714603368
class: Tools::ViewTreeInspectorApplication care for root view to disappear
Tools__ViewTreeApplication.st
--- a/Tools__ViewTreeApplication.st	Tue May 19 20:36:55 2015 +0200
+++ b/Tools__ViewTreeApplication.st	Tue Jun 23 15:41:27 2015 +0200
@@ -2636,6 +2636,8 @@
      yB    "{ Class:SmallInteger }"
     |
     rootView := self rootView.
+    rootView isNil ifTrue:[^ self ].
+
     relOrg   := widget originRelativeTo:rootView.
     relOrg isNil ifTrue:[ ^ self ].    "/ widget destroyed