The Trunk: Morphic-dtl.1374.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.1374.mcz

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

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

Name: Morphic-dtl.1374
Author: dtl
Time: 24 November 2017, 6:04:14.470996 pm
UUID: 239c9e21-1d05-413f-9f42-9c5267e15696
Ancestors: Morphic-dtl.1373, Morphic-tpr.1373

Merge Morphic-tpr.1373 and Morphic-dtl.1373, and update Debugger>>morphicResumeProcess: to remove global World reference

=============== Diff against Morphic-dtl.1373 ===============

Item was changed:
  ----- Method: Debugger>>morphicResumeProcess: (in category '*Morphic-opening') -----
  morphicResumeProcess: aTopView
 
  | processToResume |
  processToResume := interruptedProcess.
  interruptedProcess := nil. "Before delete, so release doesn't terminate it"
  aTopView delete.
+ Project current world displayWorld. "We have to redraw *before* resuming the old process."
- World displayWorld. "We have to redraw *before* resuming the old process."
  Smalltalk installLowSpaceWatcher. "restart low space handler"
 
  savedCursor
  ifNotNil: [Cursor currentCursor: savedCursor].
  processToResume isTerminated ifFalse: [
  errorWasInUIProcess
  ifTrue: [Project resumeProcess: processToResume]
  ifFalse: [processToResume resume]].
  "if old process was terminated, just terminate current one"
  errorWasInUIProcess == false
  ifFalse: [Processor terminateActive]!

Item was changed:
  ----- Method: DialogWindow>>update: (in category 'updating') -----
  update: aspect
 
  aspect == #buttons
  ifTrue: [self updateButtonExtent].
 
+ aspect == #flash
+ ifTrue: [self flash].
+
  ^ super update: aspect!