[squeak-dev] The Trunk: Morphic-mt.1397.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Feb 20 16:18:08 UTC 2018


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

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

Name: Morphic-mt.1397
Author: mt
Time: 20 February 2018, 5:18:00.672505 pm
UUID: 56cc1020-e84a-ba4f-8450-7a296f3e31d5
Ancestors: Morphic-dtl.1396

Improves cache invalidation for a morph's / window's soft drop shadow. Reduce memory load and image file size.

Cleans up the class init for MorphicProject, which is no longer needed in this form.

=============== Diff against Morphic-dtl.1396 ===============

Item was changed:
  ----- Method: MorphicProject class>>initialize (in category 'class initialization') -----
+ initialize
+ 	"MorphicProject initialize"
+ 
+ 	Smalltalk addToShutDownList: self.!
- initialize	"MorphicProject initialize"
- 	"Initialize the default Morphic Project background"
- 	self defaultFill: (SolidFillStyle color: Color white).
- 	CurrentProject ifNil:
- 		["This is the Top Project."
- 		CurrentProject := super new initialProject.
- 		CurrentProject spawnNewProcessAndTerminateOld: true].
- 	self convertOldProjects.
- 	Project current isMorphic ifTrue:[
- 		"Set the default background in the current world"
- 		Project current world color: self defaultFill.
- 	].
- !

Item was added:
+ ----- Method: MorphicProject class>>shutDown: (in category 'system startup') -----
+ shutDown: quitting
+ 
+ 	Project current isMorphic ifTrue: [
+ 		Project current world submorphsDo: [:ea |
+ 			ea removeProperty: #dropShadow]].!

Item was added:
+ ----- Method: MorphicProject class>>unload (in category 'class initialization') -----
+ unload
+ 
+ 	Smalltalk removeFromShutDownList: self.!

Item was changed:
  ----- Method: MorphicProject>>finalExitActions: (in category 'enter') -----
  finalExitActions: enteringProject
  
  	world triggerClosingScripts.
  
  	"Pause sound players, subject to preference settings"
  	(world hasProperty: #letTheMusicPlay)
  		ifTrue: [world removeProperty: #letTheMusicPlay]
  		ifFalse: [SoundService stop].
  
  	world sleep.
+ 
  	(world findA: ProjectNavigationMorph)
  		ifNotNil: [:navigator | navigator retractIfAppropriate].
+ 
  	self clearGlobalState.
+ 	Sensor flushAllButDandDEvents. 
+ 	
+ 	self world submorphsDo: [:ea | ea removeProperty: #dropShadow].!
- 	Sensor flushAllButDandDEvents. !



More information about the Squeak-dev mailing list