[squeak-dev] The Inbox: Morphic-hjh.1450.mcz

David T. Lewis lewis at mail.msen.com
Thu Jun 14 11:43:12 UTC 2018


On Thu, Jun 14, 2018 at 08:51:37AM +0200, H. Hirzel wrote:
> Please move this change to 'treated' as it is superseded by Morphic-hjh.1453.mcz

Done - moved Morphic-hjh.1450.mcz to treated inbox



> 
> On Wed, 13 Jun 2018 00:54:35 0000, commits at source.squeak.org
> <commits at source.squeak.org> wrote:
> > A new version of Morphic was added to project The Inbox:
> > http://source.squeak.org/inbox/Morphic-hjh.1450.mcz
> >
> > ==================== Summary ====================
> >
> > Name: Morphic-hjh.1450
> > Author: hjh
> > Time: 13 June 2018, 2:54:03.222528 am
> > UUID: f05f675d-069a-41f7-8133-b55161c7752b
> > Ancestors: Morphic-dtl.1449
> >
> > Fix comment on method Morph>>saveOnFile:
> >
> > SmartRefStream, not SmartReferenceStream.
> >
> > =============== Diff against Morphic-dtl.1449 ===============
> >
> > Item was changed:
> >   ----- Method: Morph>>saveOnFile (in category 'fileIn/out') -----
> >   saveOnFile
> > + 	"Ask the user for a filename and save myself on a SmartRefStream file.
> > Writes out the version and class structure.  The file is fileIn-able.
> > UniClasses will be filed out."
> > - 	"Ask the user for a filename and save myself on a SmartReferenceStream
> > file.  Writes out the version and class structure.  The file is fileIn-able.
> >  UniClasses will be filed out."
> >   	| aFileName |
> >   	aFileName := ('my {1}.morph' translated format: {self class name})
> > asFileName.	"do better?"
> >   	aFileName := UIManager default saveFilenameRequest: 'File name?'
> > translated
> >   			initialAnswer: aFileName.
> >   	aFileName ifNil: [^ Beeper beep].
> >
> >   	self allMorphsDo: [:m | m prepareToBeSaved].
> >
> >   	self saveOnFileNamed: aFileName!
> >
> >
> >
> 


More information about the Squeak-dev mailing list