--- a/Tools__ViewTreeApplication.st	Wed Feb 03 11:02:44 2010 +0100
+++ b/Tools__ViewTreeApplication.st	Wed Feb 03 11:09:47 2010 +0100
@@ -631,6 +631,16 @@
       )
 ! !
 
+!ViewTreeInspectorApplication class methodsFor:'startup'!
+
+openInPickMode
+    |app|
+
+    app := self new.
+    app open.
+    app doPickViews.
+! !
+
 !ViewTreeInspectorApplication methodsFor:'actions'!
 
 indicatorClicked:anIndex