--- a/hedgewars/uSound.pas	Sun Mar 21 18:42:34 2010 +0000
+++ b/hedgewars/uSound.pas	Sun Mar 21 19:02:03 2010 +0000
@@ -30,8 +30,8 @@
 
 var MusicFN: shortstring;
 
-procedure init_uSound;
-procedure free_uSound;
+procedure initModule;
+procedure freeModule;
 
 procedure InitSound;
 procedure ReleaseSound;
@@ -249,12 +249,12 @@
 Mix_ResumeMusic(Mus);
 end;
 
-procedure init_uSound;
+procedure initModule;
 begin
     MusicFN:='';
 end;
 
-procedure free_uSound;
+procedure freeModule;
 begin
 
 end;