# HG changeset patch # User Claus Gittinger # Date 1418142940 -3600 # Node ID 16cec0f0e3b448226be73d82a68db9fd4668934f # Parent a49100905be3c0c71240d5dd51ca6687a5142679 class: Tools::ViewTreeInspectorApplication added: #doDebugProcess - menu item 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"