anchor.diff:  begin
     if aSocket.UserData = nil then
     begin
  -    fOnError('Received data from an unknown client');
  +    aSocket.Disconnect(True); //Sometimes disconnecting them fails the first time(?) LNet bug?
  +    //fOnError('Received data from an unknown client');
       Exit;
     end;
   
  
positive.code:       //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)
        else
          fOnError('Warning: Attempted to kick a client that is not connected');
        Exit; //Only one client should have this handle
  
negative.code:     fSocketServer.IterReset;
      while fSocketServer.IterNext do
      begin
        fSocketServer.Iterator.Disconnect;
        if fSocketServer.Iterator.UserData <> nil then
        begin
          TClientInfo(fSocketServer.Iterator.UserData).Free;
          fSocketServer.Iterator.UserData := nil;
        end;
      end;
      fSocketServer.Disconnect;
    end;
    FreeAndNil(fSocketServer);
    fLastTag := FIRST_TAG-1;
  