Frank Shearar uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-fbs.631.mcz
==================== Summary ====================
Name: Morphic-fbs.631 Author: fbs Time: 19 December 2012, 4:14:25.882 pm UUID: ab1b18c8-a638-43d3-aa38-f5b4e6062e35 Ancestors: Morphic-fbs.630, Morphic-eem.629
Remerge eem-629.
=============== Diff against Morphic-fbs.630 ===============
Item was changed: ----- Method: PasteUpMorph>>findAWindowSatisfying:orMakeOneUsing: (in category 'world menu') ----- findAWindowSatisfying: qualifyingBlock orMakeOneUsing: makeBlock "Locate a window satisfying a block, open it, and bring it to the front. Create one if necessary, by using the makeBlock"
+ submorphs do: + [:aMorph | | aWindow | + (((aWindow := aMorph renderedMorph) isSystemWindow) + and: [qualifyingBlock value: aWindow]) ifTrue: + [aWindow isCollapsed ifTrue: [aWindow expand]. + self addMorphFront: aWindow. + aWindow activateAndForceLabelToShow. + ^self]]. - - submorphs do: - [:aMorph | | aWindow | - (((aWindow := aMorph renderedMorph) isSystemWindow) - and: [qualifyingBlock value: aWindow]) - ifTrue: - [aWindow isCollapsed ifTrue: [aWindow expand]. - aWindow activateAndForceLabelToShow. - ^self]]. "None found, so create one" makeBlock value!
packages@lists.squeakfoundation.org