[Pkg] The Trunk: Morphic-mt.793.mcz

[commits at source.squeak.org]

Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.793.mcz

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

Name: Morphic-mt.793
Author: mt
Time: 30 March 2015, 3:57:32.562 pm
UUID: 229243f9-466f-da4c-ac19-b77b846ca678
Ancestors: Morphic-mt.792

Attempt to fix the proceed-bug, which, under certain conditions, caused flickering and slow display update after proceeding a UI process.

=============== Diff against Morphic-mt.792 ===============

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.
+ 	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: [
- 	interruptedProcess isTerminated ifFalse: [
  		errorWasInUIProcess
+ 					ifTrue: [Project resumeProcess: processToResume]
+ 					ifFalse: [processToResume resume]].
- 					ifTrue: [Project resumeProcess: interruptedProcess]
- 					ifFalse: [interruptedProcess resume]].
  	"if old process was terminated, just terminate current one"
- 	interruptedProcess := nil. "Before delete, so release doesn't terminate it"
- 	aTopView delete.
- 	World displayWorld.
- 	Smalltalk installLowSpaceWatcher. "restart low space handler"
  	errorWasInUIProcess == false
  		ifFalse: [Processor terminateActive]!