--- a/hedgewars/uChat.pas	Sun Mar 21 18:42:34 2010 +0000
+++ b/hedgewars/uChat.pas	Sun Mar 21 19:02:03 2010 +0000
@@ -22,8 +22,8 @@
 
 interface
 
-procedure init_uChat;
-procedure free_uChat;
+procedure initModule;
+procedure freeModule;
 
 procedure AddChatString(s: shortstring);
 procedure DrawChat;
@@ -284,7 +284,7 @@
     end
 end;
 
-procedure init_uChat;
+procedure initModule;
 begin
     lastStr:= 0;
     visibleCount:= 0;
@@ -292,7 +292,7 @@
     showAll:= false;
 end;
 
-procedure free_uChat;
+procedure freeModule;
 begin
 
 end;