--- 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