diff -r 1e8e9400e9de -r 67217e6108fd hedgewars/uSound.pas --- a/hedgewars/uSound.pas Mon Oct 29 20:37:57 2012 -0400 +++ b/hedgewars/uSound.pas Tue Oct 30 02:22:54 2012 +0100 @@ -35,6 +35,7 @@ interface uses SDLh, uConsts, uTypes, SysUtils; +procedure preInitModule; procedure initModule; procedure freeModule; @@ -577,6 +578,13 @@ MuteAudio; end; +procedure preInitModule; +begin + isMusicEnabled:= true; + isSoundEnabled:= true; + cInitVolume:= 100; +end; + procedure initModule; var t: LongInt; i: TSound; @@ -586,12 +594,9 @@ MusicFN:=''; Mus:= nil; - isMusicEnabled:= true; - isSoundEnabled:= true; isAudioMuted:= false; isSEBackup:= isSoundEnabled; Volume:= 0; - cInitVolume:= 100; defVoicepack:= AskForVoicepack('Default'); for i:= Low(TSound) to High(TSound) do