hedgewars/uCommandHandlers.pas
changeset 5555 38e3d9347910
parent 5524 40b7f95d9f18
child 5577 272c82f82cee
child 5679 505c6448069b
--- a/hedgewars/uCommandHandlers.pas	Fri Aug 12 15:33:07 2011 -0400
+++ b/hedgewars/uCommandHandlers.pas	Sat Aug 13 20:44:42 2011 +0400
@@ -43,16 +43,17 @@
 const prevGState: TGameState = gsConfirm;
 begin
     s:= s; // avoid compiler hint
-    if GameState <> gsConfirm then
-    begin
+    if (GameState = gsGame) or (GameState = gsChat) then
+        begin
         prevGState:= GameState;
         GameState:= gsConfirm;
         SDL_ShowCursor(1)
-    end else
-    begin
-        GameState:= prevGState;
-        SDL_ShowCursor(ord(isPaused))
-    end
+        end else
+        if GameState = gsConfirm then
+            begin
+            GameState:= prevGState;
+            SDL_ShowCursor(ord(isPaused))
+            end
 end;
 
 procedure chForceQuit(var s: shortstring);