Close Esc menu when chat opens
authorWuzzy <Wuzzy@disroot.org>
Wed, 24 May 2023 23:58:28 +0200
changeset 15955 a4630009e733
parent 15954 6a985a680c44
child 15956 7125918637e9
Close Esc menu when chat opens
hedgewars/uChat.pas
--- a/hedgewars/uChat.pas	Wed May 24 23:54:58 2023 +0200
+++ b/hedgewars/uChat.pas	Wed May 24 23:58:28 2023 +0200
@@ -788,6 +788,8 @@
 procedure OpenChat(s: shortstring);
 var i: Integer;
 begin
+    if GameState = gsConfirm then
+        ParseCommand('quit', true);
     isInChatMode:= true;
     SDL_StopTextInput();
     SDL_StartTextInput();