hedgewars/uChat.pas
changeset 2131 8b9f7a407408
parent 2130 708758635955
child 2161 0c8634241fa4
equal deleted inserted replaced
2130:708758635955 2131:8b9f7a407408
   186     exit
   186     exit
   187     end;
   187     end;
   188 
   188 
   189 if copy(s, 1, 6) = '/team ' then
   189 if copy(s, 1, 6) = '/team ' then
   190     begin
   190     begin
   191     ParseCommand('/team ' + char(LocalClan) + UserNick + ': '+copy(s, 7, Length(s)-6), true);
   191     ParseCommand('/team ' + char(LocalClan) + UserNick + '(team): '+copy(s, 7, Length(s)-6), true);
   192     exit
   192     exit
   193     end;
   193     end;
   194 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
   194 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
   195 	begin
   195 	begin
   196 	if CurrentTeam^.ExtDriven then exit;
   196 	if CurrentTeam^.ExtDriven then exit;