tim Rowledge uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-tpr.1355.mcz
==================== Summary ====================
Name: Morphic-tpr.1355 Author: tpr Time: 28 October 2017, 11:08:55.911549 am UUID: b132d4a2-6f22-4a89-a13f-dbba9ce7a585 Ancestors: Morphic-eem.1354
Changes as part of promoting #buildWindowWith* to Model
=============== Diff against Morphic-eem.1354 ===============
Item was removed: - ----- Method: FontChooserTool>>buildWindowWith: (in category 'toolbuilder') ----- - buildWindowWith: builder - | windowSpec | - windowSpec := builder pluggableWindowSpec new. - windowSpec model: self. - windowSpec label: #windowTitle. - windowSpec children: OrderedCollection new. - ^windowSpec!
Item was removed: - ----- Method: FontChooserTool>>buildWindowWith:specs: (in category 'toolbuilder') ----- - buildWindowWith: builder specs: specs - | windowSpec | - windowSpec := self buildWindowWith: builder. - specs do:[:assoc| | action widgetSpec rect | - rect := assoc key. - action := assoc value. - widgetSpec := action value. - widgetSpec ifNotNil:[ - widgetSpec frame: rect. - windowSpec children add: widgetSpec]]. - ^windowSpec!
Item was changed: ----- Method: FontImporterTool class>>open (in category 'opening') ----- open " + FontImporterTool open. - FontChooserTool open. " ^self new open!
Item was removed: - ----- Method: FontImporterTool>>buildWindowWith:specs: (in category 'toolbuilder') ----- - buildWindowWith: builder specs: specs - | windowSpec | - windowSpec := builder pluggableWindowSpec new. - windowSpec - model: self; - label:'Choose a Font to import' translated; - extent: self initialExtent; - children: OrderedCollection new. - - specs do:[:assoc| - | rect action widgetSpec | - rect := assoc key. - action := assoc value. - widgetSpec := action value. - widgetSpec ifNotNil:[ - widgetSpec frame: rect. - windowSpec children add: widgetSpec]]. - ^windowSpec!
Item was added: + ----- Method: FontImporterTool>>windowTitle (in category 'toolbuilder') ----- + windowTitle + + ^'Choose a Font to import' translated!