hedgewars/uCommandHandlers.pas
changeset 12990 8dd95c095882
parent 12847 1aba77b2e4ac
child 12997 f06660523198
equal deleted inserted replaced
12989:c08c53624c0f 12990:8dd95c095882
    74     if GameState = gsConfirm then
    74     if GameState = gsConfirm then
    75         begin
    75         begin
    76         SendIPC(_S'Q');
    76         SendIPC(_S'Q');
    77         GameState:= gsExit
    77         GameState:= gsExit
    78         end
    78         end
    79     else
       
    80         ParseCommand('chat team', true);
       
    81 end;
    79 end;
    82 
    80 
    83 procedure chHalt (var s: shortstring);
    81 procedure chHalt (var s: shortstring);
    84 begin
    82 begin
    85     s:= s; // avoid compiler hint
    83     s:= s; // avoid compiler hint