--- a/hedgewars/uFLTypes.pas	Mon May 18 00:20:09 2015 +0300
+++ b/hedgewars/uFLTypes.pas	Thu May 21 00:19:06 2015 +0300
@@ -3,7 +3,7 @@
 
 type
     TMessageType = (mtPreview, mtAddPlayingTeam, mtRemovePlayingTeam, mtAddTeam, mtRemoveTeam
-                   , mtTeamColor);
+                   , mtTeamColor, mtNetData);
 
     TIPCMessage = record
                    str: shortstring;
@@ -12,7 +12,7 @@
                end;
 
     TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);
-    TGUICallback = procedure (p: pointer; msgType: TMessageType; msg: PChar; len: Longword); cdecl;
+    TUICallback = procedure (p: pointer; msgType: TMessageType; msg: PChar; len: Longword); cdecl;
 
     TGameType = (gtPreview, gtLocal);
     THedgehog = record