hedgewars/CCHandlers.inc
changeset 72 aeb2ac1878dc
parent 70 82d93eeecebe
child 80 3c3dc6a148ca
equal deleted inserted replaced
71:5f56c6979496 72:aeb2ac1878dc
    47 end;
    47 end;
    48 
    48 
    49 procedure chAddTeam(var s: shortstring);
    49 procedure chAddTeam(var s: shortstring);
    50 begin
    50 begin
    51 if isDeveloperMode then AddTeam;
    51 if isDeveloperMode then AddTeam;
    52 if GameType = gmtDemo then CurrentTeam.ExtDriven:= true
    52 if GameType in [gmtDemo, gmtSave] then CurrentTeam.ExtDriven:= true
    53 end;
    53 end;
    54 
    54 
    55 procedure chTeamLocal(var s: shortstring);
    55 procedure chTeamLocal(var s: shortstring);
    56 begin
    56 begin
    57 if not isDeveloperMode then exit;
    57 if not isDeveloperMode then exit;