Marcel Taeumel uploaded a new version of ST80Tools to project The Trunk:
http://source.squeak.org/trunk/ST80Tools-mt.13.mcz==================== Summary ====================
Name: ST80Tools-mt.13
Author: mt
Time: 15 March 2021, 11:25:18.388586 am
UUID: 21c1bd8b-9aa9-af45-82ad-dc592a3f9333
Ancestors: ST80Tools-mt.12
Complements Kernel-mt.1381
Fixes for debugger invocation during code simulation. See
http://forum.world.st/Please-try-out-Fixes-for-debugger-invocation-during-code-simulation-td5127684.html=============== Diff against ST80Tools-mt.12 ===============
Item was changed:
----- Method: ParagraphEditor>>debugIt (in category '*ST80Tools') -----
debugIt
| receiver context helperProcess |
self lineSelectAndEmptyCheck: [^self].
(model respondsTo: #doItReceiver)
ifTrue: [receiver := model doItReceiver].
(model respondsTo: #doItContext)
ifTrue: [context := model doItContext].
(self compileSelectionFor: receiver in: context) ifNotNil: [:doItMethod |
helperProcess := context
ifNil: [self assert: doItMethod selector = #DoIt.
Process forMethod: doItMethod receiver: receiver]
ifNotNil: [self assert: doItMethod selector = #DoItIn:.
Process forMethod: doItMethod receiver: receiver arguments: {context}].
+ helperProcess debugWithTitle: 'Debug it' translated].!
- helperProcess debugWithTitle: 'Debug it'].!