author | Claus Gittinger <cg@exept.de> |
Tue, 23 Jun 2015 15:41:27 +0200 | |
changeset 3217 | af9fd0c681e0 |
parent 3216 | 41118d54b47c |
child 3218 | 16b714603368 |
--- 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