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].
  !