[etoys-dev] Etoys Inbox: Morphic-Richo.31.mcz

[commits at source.squeak.org]

A new version of Morphic was added to project Etoys Inbox:
http://source.squeak.org/etoysinbox/Morphic-Richo.31.mcz

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

Name: Morphic-Richo.31
Author: Richo
Time: 26 July 2010, 6:26 pm
UUID: a181e53b-e988-734c-a655-edb3bbaec7b3
Ancestors: Morphic-Richo.30

* Modified Morph>>#saveOnFile: to show a warning if the file already exists.

=============== Diff against Morphic-Richo.30 ===============

Item was changed:
  ----- Method: Morph>>saveOnFile: (in category 'fileIn/out') -----
  saveOnFile: fileName
  | file |
+ file := [[(FileStream newFileNamed: fileName)] on: FileExistsException do: [:err | err defaultAction]] on: Error do: [:err | ^self inform: err description].
- file := (FileStream forceNewFileNamed: fileName).
  [file nextPutAll: (SmartRefStream streamedRepresentationOf: self topRendererOrSelf)] ensure: [file close]!