[squeak-dev] The Trunk: MorphicExtras-nice.152.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Jul 20 20:46:38 UTC 2014


Nicolas Cellier uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-nice.152.mcz

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

Name: MorphicExtras-nice.152
Author: nice
Time: 20 July 2014, 10:45:41.304 pm
UUID: 5456ca44-9e02-48c1-80f6-d4379e1b1b71
Ancestors: MorphicExtras-kfr.150

Don't use RWBinaryOrTextStream where a simple WriteStream would perfectly do the job.

=============== Diff against MorphicExtras-kfr.150 ===============

Item was changed:
  ----- Method: GraphicalDictionaryMenu>>encodeToWorkspace (in category 'menu commands') -----
  encodeToWorkspace
+ 	| stream encodedStream pict text |
+ 	pict := formChoices at: currentIndex.
+ 	stream := ByteArray new writeStream.
+ 	PNGReadWriter putForm: pict onStream: stream.
+ 	encodedStream := stream contents base64Encoded.
+ 	text := Workspace open model.
+ 	text contents: 'Form fromBinaryStream: (Base64MimeConverter mimeDecodeToBytes: ''', encodedStream,''' readStream)'!
- | stream encodedStream pict text |
- pict := formChoices at: currentIndex.
- stream := RWBinaryOrTextStream on: (String new).
- PNGReadWriter putForm: pict onStream: stream.
- encodedStream := stream contents asByteArray base64Encoded.
- text := (Workspace open) model.
- text contents: 'Form fromBinaryStream: (Base64MimeConverter mimeDecodeToBytes: ''', encodedStream,''' readStream)'!



More information about the Squeak-dev mailing list