--- a/hedgewars/uChat.pas	Tue Jan 04 12:53:46 2011 +0100
+++ b/hedgewars/uChat.pas	Tue Jan 04 13:05:30 2011 +0100
@@ -29,10 +29,6 @@
 procedure DrawChat;
 procedure KeyPressChat(Key: Longword);
 
-var UserNick: shortstring = '';
-    ChatReady: boolean;
-    showAll: boolean;
-
 implementation
 uses SDLh, uKeys, uTypes, uVariables, uCommands, uUtils, uTextures, uRender, uIO;
 
@@ -52,6 +48,8 @@
     visibleCount: LongWord;
     InputStr: TChatLine;
     InputStrL: array[0..260] of char; // for full str + 4-byte utf-8 char
+    ChatReady: boolean;
+    showAll: boolean;
 
 const colors: array[#1..#5] of TSDL_Color = (
     (r:$FF; g:$FF; b:$FF; unused:$FF), // chat message [White]
@@ -373,7 +371,6 @@
 
 procedure freeModule;
 begin
-    UserNick:= '';
 end;
 
 end.