--- a/Tools__ViewTreeApplication.st	Wed Nov 01 21:47:48 2017 +0100
+++ b/Tools__ViewTreeApplication.st	Sat Nov 11 17:30:01 2017 +0100
@@ -1329,13 +1329,17 @@
 
     model rootItem recursiveDo:[:anItem|
         widget := anItem widget.
-        origin := widget originRelativeTo:rootView.
-
-        (rectangle containsRect:(Rectangle origin:origin extent:(widget extent))) ifTrue:[
-            newItems add:anItem.
-        ]
+        widget notNil ifTrue:[
+            origin := widget originRelativeTo:rootView.
+
+            (rectangle containsRect:(Rectangle origin:origin extent:(widget extent))) ifTrue:[
+                newItems add:anItem.
+            ]
+        ].
     ].
     model value:newItems.
+
+    "Modified: / 11-11-2017 / 17:24:59 / cg"
 !
 
 processEvent:anEvent