Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.1187.mcz
==================== Summary ====================
Name: Tools-mt.1187 Author: mt Time: 23 January 2023, 2:51:49.425818 pm UUID: 0f97ea8d-eb7e-5d4e-ae90-89aabdf45e99 Ancestors: Tools-mt.1186
In debuggers, harmonize context-stack menu with debugger buttons.
=============== Diff against Tools-mt.1186 ===============
Item was changed: ----- Method: Debugger>>mainContextStackMenu: (in category 'context stack menu') ----- mainContextStackMenu: aMenu "Set up the menu appropriately for the context-stack-list, unshifted" <contextStackMenuShifted: false> + + Preferences restartAlsoProceeds + ifTrue: [ + aMenu + addTranslatedList: #( + ('proceed top (p)' proceed) + ('proceed here (r)' restart))] + ifFalse: [ + aMenu + addTranslatedList: #( + ('proceed (p)' proceed) + ('restart (r)' restart))]. + ^ aMenu + addTranslatedList: #( + - + ('step into (e)' stepInto) + ('step over (t)' stepOver) + ('step through (T)' stepIntoBlock) + - + ('show full stack (f)' showFullStack) + ('show where (w)' showWhere) + - + ('tally it' tally) + ('peel to first like this' peelToFirst) + ('return entered value' returnValue) ); - addTranslatedList: #( - ('fullStack (f)' fullStack) - ('restart (r)' restart) - ('proceed (p)' proceed) - ('step (t)' doStep) - ('step through (T)' stepIntoBlock) - ('send (e)' send) - ('where (w)' where) - ('peel to first like this' peelToFirst) - - - ('return entered value' returnValue) - - ); add: (self isBreakOnEntry ifTrue: ['<on>'] ifFalse: ['<off>']) , 'break on entry' translated action: #toggleBreakOnEntry; addTranslatedList: #( + - ('senders of (n)' browseSendersOfMessages) ('implementors of (m)' browseMessages) ('inheritance (i)' methodHierarchy) ('versions (v)' browseVersions) - ('references (r)' browseVariableReferences) ('assignments (a)' browseVariableAssignments) - ('class refs (N)' browseClassRefs) ('browse full (b)' browseMethodFull) ('file out ' fileOutMessage) ('remove method (x) ' removeMessage) - ('copy bug report to clipboard' copyBugReportToClipboard)); yourself!
packages@lists.squeakfoundation.org