David T. Lewis uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-dtl.183.mcz==================== Summary ====================
Name: Tools-dtl.183
Author: dtl
Time: 14 February 2010, 10:27:02.644 pm
UUID: b87413f1-e718-4f73-ac0e-375bf34ed466
Ancestors: Tools-dtl.182
Recategorize Utilities class>> openScratchWorkspaceLabeled:contents: from System to ST80 ( MVC-only method).
Eliminate explicit MVC/Morphic references in Utilities class>>closeAllDebuggers
=============== Diff against Tools-dtl.182 ===============
Item was changed:
----- Method: Utilities class>>closeAllDebuggers (in category '*Tools') -----
closeAllDebuggers
"Utilities closeAllDebuggers"
Smalltalk isMorphic
ifTrue:
+ [((Smalltalk at: #SystemWindow) allSubInstances select: [:w | w model isKindOf: Debugger])
- [(SystemWindow allSubInstances select: [:w | w model isKindOf: Debugger])
do: [:w | w delete]]
ifFalse:
+ [((Smalltalk at: #StandardSystemController) allInstances select: [:w | w model isKindOf: Debugger])
- [(StandardSystemController allInstances select: [:w | w model isKindOf: Debugger])
do: [:w | w closeAndUnscheduleNoTerminate]]!