--- a/hedgewars/uChat.pas	Sun Jul 25 17:32:07 2010 +0200
+++ b/hedgewars/uChat.pas	Sat Jul 31 07:05:06 2010 +0200
@@ -29,7 +29,7 @@
 procedure DrawChat;
 procedure KeyPressChat(Key: Longword);
 
-var UserNick: shortstring;
+var UserNick: shortstring = '';
     ChatReady: boolean;
     showAll: boolean;
 
@@ -316,7 +316,6 @@
 begin
     lastStr:= 0;
     visibleCount:= 0;
-    UserNick:= '';
     showAll:= false;
     ChatReady:= false;
     missedCount:= 0;
@@ -324,7 +323,7 @@
 
 procedure freeModule;
 begin
-
+    UserNick:= '';
 end;
 
 end.