hedgewars/uCommandHandlers.pas
changeset 10510 9329dab04490
parent 10472 8d04cebedb16
child 10603 bda5c7caf396
equal deleted inserted replaced
10509:d62d3c706947 10510:9329dab04490
    52         begin
    52         begin
    53         prevGState:= GameState;
    53         prevGState:= GameState;
    54         GameState:= gsConfirm;
    54         GameState:= gsConfirm;
    55         end
    55         end
    56     else
    56     else
    57         if GameState = gsConfirm then            
    57         if GameState = gsConfirm then
    58             GameState:= prevGState;            
    58             GameState:= prevGState;
    59             
    59 
    60     updateCursorVisibility;
    60     updateCursorVisibility;
    61 end;
    61 end;
    62 
    62 
    63 procedure chForceQuit(var s: shortstring);
    63 procedure chForceQuit(var s: shortstring);
    64 begin
    64 begin