Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.757.mcz
==================== Summary ====================
Name: Morphic-mt.757 Author: mt Time: 3 February 2015, 12:06:47.624 pm UUID: 584dd819-8f9d-0e4a-a0cc-9449a4180066 Ancestors: Morphic-cmm.756
Let CMD+. use the current ToolSet to open the debugger. This is now consistent with the way exceptions do it.
=============== Diff against Morphic-cmm.756 ===============
Item was changed: ----- Method: MorphicProject>>interruptName:preemptedProcess: (in category 'utilities') ----- interruptName: labelString preemptedProcess: theInterruptedProcess "Create a Notifier on the active scheduling process with the given label."
| preemptedProcess projectProcess | ActiveHand ifNotNil:[ActiveHand interrupted]. ActiveWorld := World. "reinstall active globals" ActiveHand := World primaryHand. ActiveHand interrupted. "make sure this one's interrupted too" ActiveEvent := nil.
projectProcess := self uiProcess. "we still need the accessor for a while" preemptedProcess := theInterruptedProcess ifNil: [Processor preemptedProcess]. "Only debug preempted process if its priority is >= projectProcess' priority" preemptedProcess priority < projectProcess priority ifTrue:[preemptedProcess := projectProcess]. preemptedProcess suspend. + ToolSet interrupt: preemptedProcess label: labelString.! - Debugger openInterrupt: labelString onProcess: preemptedProcess - !
squeak-dev@lists.squeakfoundation.org