Etoys: System-bf.53.mcz

Bert Freudenberg uploaded a new version of System to project Etoys:
http://source.squeak.org/etoys/System-bf.53.mcz

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

Name: System-bf.53
Author: bf
Time: 8 March 2012, 9:54:44 pm
UUID: 0fe67c60-d73b-4314-9f84-1492b90b8557
Ancestors: System-kfr.52

Default to stop sound when done on Linux

=============== Diff against System-kfr.52 ===============

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].
  platform := self platformName.
  specs := #(
+ (soundStopWhenDone true)
- (soundStopWhenDone false)
  (soundQuickStart false)
  (swapControlAndAltKeys true)
  ).
  platform = 'Win32' ifTrue:[
  specs := #(
  (soundStopWhenDone true)
  (soundQuickStart false)
  (swapControlAndAltKeys true)
  )].
  platform = 'Mac OS' ifTrue:[
  specs := #(
  (soundStopWhenDone false)
  (soundQuickStart true)
  (swapControlAndAltKeys false)
  )].
  specs do:[:tuple|
  Preferences setPreference: tuple first toValue: (tuple last == true).
  ].
  !

_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev