anchor.diff:        //Found the client that must be kicked
         ClientDisconnect(fSocketServer.Iterator); //Seems to be a bug in LNet where ClientDisconnect is not called sometimes? So call it ourself just in case
         if fSocketServer.Iterator.ConnectionStatus in [scConnected, scConnecting, scDisconnecting] then
  -        fSocketServer.Iterator.Disconnect(True)
  +        fSocketServer.Iterator.Disconnect
         else
           fOnError('Warning: Attempted to kick a client that is not connected');
         Exit; //Only one client should have this handle
  
positive.code:     fSocketServer.IterReset;
      while fSocketServer.IterNext do
      begin
        fSocketServer.Iterator.Disconnect(True);
        if fSocketServer.Iterator.UserData <> nil then
        begin
          TClientInfo(fSocketServer.Iterator.UserData).Free;
          fSocketServer.Iterator.UserData := nil;
        end;
      end;
      fSocketServer.Disconnect(True);
    end;
    FreeAndNil(fSocketServer);
    fLastTag := FIRST_TAG-1;
  
negative.code: begin
    if aSocket.UserData = nil then
    begin
      aSocket.Disconnect(True); //Sometimes disconnecting them fails the first time(?) LNet bug?
      //fOnError('Received data from an unknown client');
      Exit;
    end;
  
  