//irccommandsunit.pas
//clear queue on setdown !all!

begin
  Result:= False;
  sitename:= UpperCase(params);

  queue_lock.Enter;

  if AnsiSameText( sitename, '!all!' ) then
  begin
    for i:= 0 to sites.Count -1 do
    begin
      s:= TSite(sites[i]);
      s.markeddown:= True;
      s.working:= sstDown;
      QueueEmpty(s.name);//MODDED CLEAR QUEUE ON SETDOWN ALL
    end;
  end else
  begin