changeset 2130 | 708758635955 |
parent 2125 | 3ebe8cd30b84 |
child 2162 | 2bce91404d49 |
--- a/hedgewars/CCHandlers.inc Wed May 27 18:13:06 2009 +0000 +++ b/hedgewars/CCHandlers.inc Thu May 28 00:25:19 2009 +0000 @@ -46,6 +46,17 @@ SendIPC('Q'); GameState:= gsExit end +else + begin + GameState:= gsChat; + KeyPressChat(27); + KeyPressChat(47); + KeyPressChat(116); + KeyPressChat(101); + KeyPressChat(97); + KeyPressChat(109); + KeyPressChat(32) + end end; procedure chCheckProto(var s: shortstring);