--- a/hedgewars/uCollisions.pas	Sun Mar 21 18:42:34 2010 +0000
+++ b/hedgewars/uCollisions.pas	Sun Mar 21 19:02:03 2010 +0000
@@ -30,8 +30,8 @@
             Count: Longword
             end;
 
-procedure init_uCollisions;
-procedure free_uCollisions;
+procedure initModule;
+procedure freeModule;
 
 procedure AddGearCI(Gear: PGear);
 procedure DeleteCI(Gear: PGear);
@@ -312,12 +312,12 @@
 Gear^.Y:= Gear^.Y - int2hwFloat(ShiftY)
 end;
 
-procedure init_uCollisions;
+procedure initModule;
 begin
     Count:= 0;
 end;
 
-procedure free_uCollisions;
+procedure freeModule;
 begin
 
 end;