[squeak-dev] The Trunk: Morphic-cmm.698.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Nov 14 21:49:56 UTC 2013


Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.698.mcz

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

Name: Morphic-cmm.698
Author: cmm
Time: 14 November 2013, 3:47:33.881 pm
UUID: 99f56b3c-e9d9-4d7c-a44e-0814fca4d04c
Ancestors: Morphic-fbs.697

Freshen the defaultBackgroundForm and a method to make doing so easier in the future.

=============== Diff against Morphic-fbs.697 ===============

Item was added:
+ ----- Method: MorphicProject class>>compileNewDefaultBackgroundFrom: (in category 'utilities') -----
+ compileNewDefaultBackgroundFrom: aForm 
+ 	"Compile a new #defaultBackgroundForm method in this class-side which uses aForm as the background."
+ 	| formStream base64Stream |
+ 	formStream := RWBinaryOrTextStream on: ByteArray new.
+ 	PNGReadWriter
+ 		putForm: aForm
+ 		onStream: formStream.
+ 	base64Stream := Base64MimeConverter mimeEncode: formStream.
+ 	self class
+ 		compile:
+ 			(String streamContents:
+ 				[ : stream | stream
+ 					 nextPutAll: 'defaultBackgroundForm
+ 	^ Form fromBinaryStream: ' ;
+ 					 nextPut: $' ;
+ 					 nextPutAll: base64Stream contents ;
+ 					 nextPut: $' ;
+ 					nextPutAll: ' base64Decoded asByteArray readStream' ])
+ 		classified: 'class initialization'!

Item was changed:
  ----- Method: MorphicProject class>>defaultBackgroundForm (in category 'class initialization') -----
(excessive size, no diff calculated)



More information about the Squeak-dev mailing list