diff -r a49100905be3 -r 16cec0f0e3b4 Tools__ViewTreeApplication.st --- 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"