--- a/Tools__ViewTreeApplication.st	Sun Dec 07 10:29:26 2014 +0100
+++ b/Tools__ViewTreeApplication.st	Tue Dec 09 17:35:40 2014 +0100
@@ -596,6 +596,11 @@
               (
                (MenuItem
                   enabled: hasSingleSelectionHolder
+                  label: 'Debug'
+                  itemValue: doDebugProcess
+                )
+               (MenuItem
+                  enabled: hasSingleSelectionHolder
                   label: 'Inspect'
                   itemValue: doInspect:
                   argument: process
@@ -1944,6 +1949,17 @@
 "/        activeHelpKey:#doUncatchEvents.
 !
 
+doDebugProcess
+    "open debugger on the window process"
+
+    |view|
+
+    view := self selectedView.
+    view isNil ifTrue:[^ nil].
+
+    Debugger openOn:view windowGroup process
+!
+
 doDestroy
     "destroy the current selected view"