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