[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
|