--- a/Tools__ViewTreeApplication.st	Mon Dec 01 17:43:38 2014 +0100
+++ b/Tools__ViewTreeApplication.st	Tue Dec 02 19:23:38 2014 +0100
@@ -682,28 +682,28 @@
             label: 'Browse View Class'
             itemValue: doBrowse:
             translateLabel: true
-            argument: view
+            argument: #view
           )
          (MenuItem
             label: 'Browse Model Class'
             itemValue: doBrowse:
             translateLabel: true
             isVisible: hasModel
-            argument: model
+            argument: #model
           )
          (MenuItem
             label: 'Browse Application Class'
             itemValue: doBrowse:
             translateLabel: true
             isVisible: hasApplication
-            argument: application
+            argument: #application
           )
          (MenuItem
             label: 'Browse Controller Class'
             itemValue: doBrowse:
             translateLabel: true
             isVisible: hasController
-            argument: controller
+            argument: #controller
           )
          (MenuItem
             label: '-'
@@ -712,34 +712,34 @@
             label: 'Inspect View'
             itemValue: doInspect:
             translateLabel: true
-            argument: view
+            argument: #view
           )
          (MenuItem
             label: 'Inspect Window Group'
             itemValue: doInspect:
             translateLabel: true
-            argument: group
+            argument: #group
           )
          (MenuItem
             label: 'Inspect Model'
             itemValue: doInspect:
             translateLabel: true
             isVisible: hasModel
-            argument: model
+            argument: #model
           )
          (MenuItem
             label: 'Inspect Application'
             itemValue: doInspect:
             translateLabel: true
             isVisible: hasApplication
-            argument: application
+            argument: #application
           )
          (MenuItem
             label: 'Inspect Controller'
             itemValue: doInspect:
             translateLabel: true
             isVisible: hasController
-            argument: controller
+            argument: #controller
           )
          (MenuItem
             label: '-'
@@ -2122,7 +2122,8 @@
     ifFalse:[what == #application ifTrue:[ inst := view application ]
     ifFalse:[what == #controller  ifTrue:[ inst := view controller  ]
     ifFalse:[what == #process     ifTrue:[ inst := view windowGroup process  ]
-    ifFalse:[what == #sensor      ifTrue:[ inst := view sensor  ]]]]]].
+    ifFalse:[what == #sensor      ifTrue:[ inst := view sensor  ]
+    ifFalse:[inst := view  ]]]]]].
 
     (inst isNil and:[what == #application]) ifTrue:[
         inst := view topView