hedgewars/uChat.pas
branchqmlfrontend
changeset 10606 8e95911cb86b
parent 10588 6189bb1c903d
child 10634 35d059bd0932
equal deleted inserted replaced
10519:af019fa70080 10606:8e95911cb86b
   390             if (s = Wavez[i].cmd) then
   390             if (s = Wavez[i].cmd) then
   391                 begin
   391                 begin
   392                 ParseCommand('/taunt ' + char(i), true);
   392                 ParseCommand('/taunt ' + char(i), true);
   393                 exit
   393                 exit
   394                 end;
   394                 end;
   395 
   395         end;
   396         for j:= Low(TChatCmd) to High(TChatCmd) do
   396 
   397             if (s = ChatCommandz[j].ChatCmd) then
   397     for j:= Low(TChatCmd) to High(TChatCmd) do
   398                 begin
   398         if (s = ChatCommandz[j].ChatCmd) then
   399                 ParseCommand(ChatCommandz[j].ProcedureCallChatCmd, true);
   399             begin
   400                 exit
   400             ParseCommand(ChatCommandz[j].ProcedureCallChatCmd, true);
   401                 end;
   401             exit
   402         end;
   402             end;
   403 
   403 
   404     if (gameType = gmtNet) then
   404     if (gameType = gmtNet) then
   405         SendConsoleCommand(s)
   405         SendConsoleCommand(s)
   406     end
   406     end
   407 else
   407 else