[Pkg] The Trunk: Morphic-cmm.548.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Jun 21 20:42:41 UTC 2011
Chris Muller uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-cmm.548.mcz
==================== Summary ====================
Name: Morphic-cmm.548
Author: cmm
Time: 21 June 2011, 3:41:38.366 pm
UUID: 66bb56ac-68d6-4a76-ac20-588f3b193bbe
Ancestors: Morphic-ul.547, Morphic-HenrikSperreJohansen.518
Merged Morphic-HenrikSperreJohansen.518.
=============== Diff against Morphic-ul.547 ===============
Item was changed:
----- Method: HaloMorph>>mouseDownInDimissHandle:with: (in category 'private') -----
mouseDownInDimissHandle: evt with: dismissHandle
evt hand obtainHalo: self.
+ SoundService soundEnabled ifTrue: [TrashCanMorph playMouseEnterSound].
- Preferences soundsEnabled ifTrue: [TrashCanMorph playMouseEnterSound].
self removeAllHandlesBut: dismissHandle.
self setColor: Color darkGray toHandle: dismissHandle.
!
Item was changed:
----- Method: Morph>>vanishAfterSlidingTo:event: (in category 'dropping/grabbing') -----
vanishAfterSlidingTo: aPosition event: evt
| aForm aWorld startPoint endPoint |
aForm := self imageForm offset: 0 at 0.
aWorld := self world.
startPoint := evt hand fullBounds origin.
self delete.
aWorld displayWorld.
endPoint := aPosition.
aForm slideFrom: startPoint to: endPoint nSteps: 12 delay: 15.
+ SoundService soundEnabled ifTrue: [TrashCanMorph playDeleteSound].
- Preferences soundsEnabled ifTrue: [TrashCanMorph playDeleteSound].
!
More information about the Packages
mailing list