The Trunk: Morphic-dtl.332.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Morphic-dtl.332.mcz

commits-2
David T. Lewis uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-dtl.332.mcz

==================== Summary ====================

Name: Morphic-dtl.332
Author: dtl
Time: 9 February 2010, 8:06:46.133 am
UUID: 320729b0-1c00-4a7a-9ba7-1ffae064491a
Ancestors: Morphic-kb.331

Remove explicit MVC and Morphic dependencies from SyntaxError. SyntaxError is a model in Debugger (not an exception class).

=============== Diff against Morphic-kb.331 ===============

Item was added:
+ ----- Method: SyntaxError class>>morphicOpen: (in category '*Morphic-Models') -----
+ morphicOpen: aSyntaxError
+ "Answer a view whose model is an instance of me."
+
+ self buildMorphicViewOn: aSyntaxError.
+ Project spawnNewProcessIfThisIsUI: Processor activeProcess.
+ ^ Processor activeProcess suspend!

Item was added:
+ ----- Method: SyntaxError class>>buildMorphicViewOn: (in category '*Morphic-Models') -----
+ buildMorphicViewOn: aSyntaxError
+ "Answer an Morphic view on the given SyntaxError."
+ | window |
+ window := (SystemWindow labelled: 'Syntax Error') model: aSyntaxError.
+
+ window addMorph: (PluggableListMorph on: aSyntaxError list: #list
+ selected: #listIndex changeSelected: nil menu: #listMenu:)
+ frame: (0@0 corner: 1@0.15).
+
+ window addMorph: (PluggableTextMorph on: aSyntaxError text: #contents
+ accept: #contents:notifying: readSelection: #contentsSelection
+ menu: #codePaneMenu:shifted:)
+ frame: (0@0.15 corner: 1@1).
+
+ ^ window openInWorldExtent: 380@220!