[etoys-dev] Etoys: Etoys-kfr.84.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-kfr.84.mcz

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

Name: Etoys-kfr.84
Author: kfr
Time: 21 July 2011, 7:14:12 pm
UUID: c3a2080d-8abf-8d4a-8264-ee8c2c6f8eeb
Ancestors: Etoys-kfr.83

Simplify the selection of sounds for instruments.
Nore to self: Test before publishing

=============== Diff against Etoys-kfr.83 ===============

Item was changed:
  ----- Method: Player>>beep: (in category 'slots-user') -----
  beep: anObject
  	"Play given sound or at least beep."
  
  	| sound |
  	anObject isString
  		ifTrue:
  			[sound := SoundService default playSoundNamedOrBeep: anObject.
  			(sound respondsTo: #stopGracefully)
+ 				ifTrue: [self costume setProperty: #sound toValue: anObject.
- 				ifTrue: [self costume setProperty: #sound toValue: sound.
  							self costume setProperty: #playingSound toValue: sound]]
  		ifFalse:
  			[SoundPlayer resumePlaying: anObject quickStart: true]
  !