--- a/hedgewars/CCHandlers.inc	Wed Jun 11 20:45:49 2008 +0000
+++ b/hedgewars/CCHandlers.inc	Wed Jun 11 21:00:58 2008 +0000
@@ -526,5 +526,6 @@
 
 procedure chChat(var s: shortstring);
 begin
-GameState:= gsChat
+GameState:= gsChat;
+KeyPressChat(27)
 end;