Karl Ramberg uploaded a new version of Sound to project Etoys: http://source.squeak.org/etoys/Sound-kfr.24.mcz
==================== Summary ====================
Name: Sound-kfr.24 Author: kfr Time: 6 March 2012, 11:02:08 pm UUID: 0230b83b-0a79-4b4e-8c98-7ce0287cc248 Ancestors: Sound-kfr.20
Fix loading/drops of aif and aiff files http://tracker.squeakland.org/browse/SQ-1032
=============== Diff against Sound-kfr.20 ===============
Item was changed: ----- Method: AnonymousSoundMorph class>>fromFileName: (in category 'fileIn/Out') ----- fromFileName: fullName "Create an instance of the receiver from the given file path." | newPlayer aSound ext aName | newPlayer _ self new initialize. + ('*aif*' match: fullName) - ('*aif' match: fullName) ifTrue: [aSound := SampledSound fromAIFFfileNamed: fullName]. ('*wav' match: fullName) ifTrue: [aSound := SampledSound fromWaveFileNamed: fullName]. newPlayer := self new.
ext := FileDirectory extensionFor: fullName. aName := (FileDirectory on: fullName) pathParts last. ext size > 0 ifTrue: [aName := aName copyFrom: 1 to: (aName size - (ext size + 1))]. newPlayer sound: aSound interimName: aName.
+ newPlayer openInWorld; position: ActiveWorld center! - newPlayer openInWorld!
Item was changed: ----- Method: AnonymousSoundMorph class>>registeredAudioFileSuffixes (in category 'file suffixes') ----- registeredAudioFileSuffixes "Answer the file extensions for which the receiver registers audio services with FileList." "AnonymousSoundMorph registeredAudioFileSuffixes"
+ ^ { 'aif'. 'aiff'. 'wav'}! - ^ { 'aif'. 'wav'}!
etoys-dev@lists.squeakfoundation.org