Chris Muller uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-cmm.739.mcz
==================== Summary ====================
Name: Morphic-cmm.739 Author: cmm Time: 4 August 2014, 1:35:54.444 pm UUID: 267ead18-a751-4d26-b317-1e09c6442940 Ancestors: Morphic-kfr.733, Morphic-cmm.738
Re-save changes from nice.736 and nice.737.
=============== Diff against Morphic-kfr.733 ===============
Item was changed: ----- 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 base64 | + formStream := ByteArray new writeStream. - | formStream base64Stream | - formStream := RWBinaryOrTextStream on: ByteArray new. PNGReadWriter putForm: aForm onStream: formStream. + base64 := formStream base64Encoded. - base64Stream := Base64MimeConverter mimeEncode: formStream. self class compile: (String streamContents: [ : stream | stream nextPutAll: 'defaultBackgroundForm ^ Form fromBinaryStream: ' ; nextPut: $' ; + nextPutAll: base64 ; - nextPutAll: base64Stream contents ; nextPut: $' ; nextPutAll: ' base64Decoded asByteArray readStream' ]) classified: 'class initialization'!
Item was changed: ----- Method: TextEditor>>selectionAsStream (in category 'accessing-selection') ----- selectionAsStream "Answer a ReadStream on the text in the paragraph that is currently selected."
+ ^ReadStream - ^ReadWriteStream on: paragraph string from: self startIndex to: self stopIndex - 1!