[Pkg] The Trunk: System-fbs.611.mcz

[commits at source.squeak.org]

Frank Shearar uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-fbs.611.mcz

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

Name: System-fbs.611
Author: fbs
Time: 30 October 2013, 10:34:30.628 pm
UUID: bf980237-cd6b-b44b-b1b7-76e3bd841cda
Ancestors: System-cmm.610

Make SoundPlayer responsible for platform-specific sound things.

=============== Diff against System-cmm.610 ===============

Item was changed:
  ----- Method: SmalltalkImage>>setPlatformPreferences (in category 'snapshot and quit') -----
  setPlatformPreferences
  	"Set some platform specific preferences on system startup"
  	| platform specs |
  	Preferences automaticPlatformSettings ifFalse:[^self].
- 	SoundPlayer soundQuickStart: SoundPlayer defaultQuickStartForPlatform.
- 	SoundPlayer stopSoundWhenDone: SoundPlayer defaultStopSoundForPlatform.
  	platform := self platformName.
  	specs := 	#().
  	platform = 'Win32' ifTrue:[
  		specs := #()].
  	platform = 'Mac OS' ifTrue:[
  		specs := #()].
  	specs do:[:tuple|
  		Preferences setPreference: tuple first toValue: (tuple last == true).
  	].
  !