The Trunk: Morphic-pre.1489.mcz

Patrick Rein uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-pre.1489.mcz

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

Name: Morphic-pre.1489
Author: pre
Time: 14 June 2019, 8:31:21.288862 pm
UUID: 5e2933e1-ce9f-1c44-9362-7292158da7eb
Ancestors: Morphic-pre.1488

Moves two methods from Collections belonging to Morphic to that package.

=============== Diff against Morphic-pre.1488 ===============

Item was added:
+ ----- Method: Text>>embeddedMorphs (in category '*Morphic-Text Support') -----
+ embeddedMorphs
+ "return the list of morphs embedded in me"
+
+ | morphs |
+ morphs := IdentitySet new.
+ runs withStartStopAndValueDo:
+ [:start :stop :attribs |
+ attribs
+ do: [:attrib | attrib anchoredMorph ifNotNil: [morphs add: attrib anchoredMorph]]].
+ ^morphs select: [:m | m isMorph]!

Item was added:
+ ----- Method: Text>>embeddedMorphsFrom:to: (in category '*Morphic-Text Support') -----
+ embeddedMorphsFrom: start to: stop
+ "return the list of morphs embedded in me"
+
+ | morphs |
+ morphs := IdentitySet new.
+ runs
+ runsFrom: start
+ to: stop
+ do:
+ [:attribs |
+ attribs
+ do: [:attr | attr anchoredMorph ifNotNil: [morphs add: attr anchoredMorph]]].
+ ^morphs select: [:m | m isMorph]!