hedgewars/uChat.pas
changeset 2518 126850aec94d
parent 2500 31ba68a50208
child 2619 bc2786a00fb8
equal deleted inserted replaced
2517:6ed1fba6da18 2518:126850aec94d
   202     else
   202     else
   203         ParseCommand('/hogsay '#6 + copy(s, 6, Length(s)-5), true);
   203         ParseCommand('/hogsay '#6 + copy(s, 6, Length(s)-5), true);
   204     exit
   204     exit
   205     end;
   205     end;
   206 
   206 
   207 if copy(s, 1, 6) = '/team ' then
   207 if (copy(s, 1, 6) = '/team ') and (length(s) > 6) then
   208     begin
   208     begin
   209     ParseCommand(s, true);
   209     ParseCommand(s, true);
   210     exit
   210     exit
   211     end;
   211     end;
   212 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then
   212 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then