[squeak-dev] The Trunk: System-mt.1124.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Nov 20 13:44:32 UTC 2019


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

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

Name: System-mt.1124
Author: mt
Time: 20 November 2019, 2:44:27.477662 pm
UUID: 9b067d06-cee0-1d46-b3f8-cf5267da8c9c
Ancestors: System-mt.1123

Fixes a recent regression *and* code duplication. New MVC/Morphic projects can be created and opened again.

=============== Diff against System-mt.1123 ===============

Item was changed:
  ----- Method: Project>>makeThumbnail (in category 'menu messages') -----
  makeThumbnail
  	"Make a thumbnail image of this project from the Display."
+ 
+ 	thumbnail := self previewImageForm.
- 	viewSize ifNil: [viewSize := Display extent // 8].
- 	thumbnail := Form extent: viewSize depth: Display depth.
- 	(WarpBlt toForm: thumbnail)
- 			sourceForm: Display;
- 			cellSize: 2;  "installs a colormap"
- 			combinationRule: Form over;
- 			copyQuad: (Display boundingBox) innerCorners
- 			toRect: (0 at 0 extent: viewSize).
  	(Smalltalk at: #InternalThreadNavigationMorph) ifNotNil: [:tnMorph |
+ 		tnMorph cacheThumbnailFor: self].
- 			tnMorph  cacheThumbnailFor: self].
  	^thumbnail
  !

Item was changed:
  ----- Method: Project>>viewSize (in category 'accessing') -----
  viewSize
+ 	^ viewSize ifNil: [viewSize := Display extent // 8]!
- 	^ viewSize!



More information about the Squeak-dev mailing list