anchor.diff:      procedure Lobby_OnPlayersSetup(Sender: TObject);
       procedure Lobby_OnReassignedToHost(Sender: TObject);
   
  +    function DetectMapType: Integer;
       procedure BackClick(Sender: TObject);
       procedure SettingsClick(Sender: TObject);
       procedure StartClick(Sender: TObject);
  
positive.code:         Break;
        end;
    end;
  var OldMapType: byte;
  begin
    Lobby_Reset(lpk_Host, True, True); //Will reset the lobby page into host mode, preserving messages/maps
    OldMapType := Radio_LobbyMapType.ItemIndex;
    if fNetworking.SelectGameKind = ngk_None then
      Radio_LobbyMapType.ItemIndex := 0 //Default
    else
      if fNetworking.SelectGameKind = ngk_Save then
        Radio_LobbyMapType.ItemIndex := 4
      else
        if fNetworking.MapInfo.IsCoop then
          Radio_LobbyMapType.ItemIndex := 2
        else
          if fNetworking.MapInfo.IsSpecial then
            Radio_LobbyMapType.ItemIndex := 3
          else
            if fNetworking.MapInfo.MissionMode = mm_Tactic then
              Radio_LobbyMapType.ItemIndex := 1
            else
              Radio_LobbyMapType.ItemIndex := 0;
  
    //Don't force rescanning all the maps unless the map type changed or no map was selected
    if (Radio_LobbyMapType.ItemIndex <> OldMapType) or (DropCol_LobbyMaps.ItemIndex = -1) then
  
negative.code: 
  
  procedure TKMGUIMenuLobby.Lobby_OnPingInfo(Sender: TObject);
  var I: Integer;
  begin
    for I := 0 to MAX_PLAYERS - 1 do
    if (fNetworking.Connected) and (I < fNetworking.NetPlayers.Count) and
       (fNetworking.NetPlayers[I+1].IsHuman) then
    begin
      Label_LobbyPing[I].Caption := IntToStr(fNetworking.NetPlayers[I+1].GetInstantPing);
      Label_LobbyPing[I].FontColor := GetPingColor(fNetworking.NetPlayers[I+1].GetInstantPing);
    end
    else
      Label_LobbyPing[I].Caption := '';
    Label_LobbyServerName.Caption := fNetworking.ServerName+' #'+IntToStr(fNetworking.ServerRoom+1)+
                                     '  '+fNetworking.ServerAddress+' : '+fNetworking.ServerPort;
  end;
  