[etoys-dev] Etoys: Etoys-bf.50.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Oct 13 03:12:53 EDT 2010

Bert Freudenberg uploaded a new version of Etoys to project Etoys:

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

Name: Etoys-bf.50
Author: bf
Time: 13 October 2010, 12:12:03 am
UUID: de8b6755-a7b1-4791-883c-f5efe8020ce6
Ancestors: Etoys-bf.49

Only keep actual sounds as property (SQ-845)

=============== Diff against Etoys-bf.49 ===============

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

More information about the etoys-dev mailing list