--- a/hedgewars/uChat.pas	Sun Nov 21 19:41:19 2010 +0300
+++ b/hedgewars/uChat.pas	Sun Nov 21 19:51:33 2010 +0300
@@ -308,6 +308,11 @@
     end
 end;
 
+procedure chChatMessage(var s: shortstring);
+begin
+    AddChatString(s)
+end;
+
 procedure chSay(var s: shortstring);
 begin
     SendIPC('s' + s);
@@ -355,6 +360,7 @@
 
 procedure initModule;
 begin
+    RegisterVariable('chatmsg', vtCommand, @chChatMessage, true);
     RegisterVariable('say', vtCommand, @chSay, true);
     RegisterVariable('team', vtCommand, @chTeamSay, true);
     RegisterVariable('history', vtCommand, @chHistory, true );