Andreas Raab uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-ar.456.mcz
==================== Summary ====================
Name: Morphic-ar.456 Author: ar Time: 30 July 2010, 6:51:28.196 pm UUID: 1ae494bf-44b2-5d4e-a9eb-5d35f4d6ce98 Ancestors: Morphic-ar.455
Reclassify methods belonging to Morphic, not Etoys.
=============== Diff against Morphic-ar.455 ===============
Item was added: + ----- Method: HaloMorph>>doMakeSiblingOrDup:with: (in category 'handles') ----- + doMakeSiblingOrDup: evt with: dupHandle + "Ask hand to duplicate my target, if shift key *is* pressed, or make a sibling if shift key *not* pressed" + + ^ (evt shiftPressed or: [target couldMakeSibling not]) + ifFalse: + [self doMakeSibling: evt with: dupHandle] + ifTrue: + [dupHandle color: Color green. + self doDup: evt with: dupHandle]!
Item was added: + ----- Method: HaloMorph>>doDupOrMakeSibling:with: (in category 'handles') ----- + doDupOrMakeSibling: evt with: dupHandle + "Ask hand to duplicate my target, if shift key *not* pressed, or make a sibling if shift key *is* pressed" + + ^ (evt shiftPressed and: [target couldMakeSibling]) + ifTrue: + [dupHandle color: Color green muchDarker. + self doMakeSibling: evt with: dupHandle] + ifFalse: + [self doDup: evt with: dupHandle]!