anchor.diff:      procedure UpdateDebugInfo;
       procedure HidePages;
       procedure HideOverlay(Sender: TObject);
  +    procedure Replay_JumpToPlayer;
  +    procedure Replay_ViewPlayer;
       procedure Replay_ListDoubleClick(Sender: TObject);
     protected
       Sidebar_Top: TKMImage;
  
positive.code: end;
  
  
  procedure TKMGamePlayInterface.ReplayClick(Sender: TObject);
  var
    oldCenter: TKMPointF;
  
negative.code:     if (SpecPlayerIndex <> -1) and (Dropbox_ReplayFOW.Count >= SpecPlayerIndex) then
      begin
        Dropbox_ReplayFOW.ItemIndex := SpecPlayerIndex - 1;
        if ssCtrl in Shift then
          Replay_JumpToPlayer
        else
          Replay_ViewPlayer;
        Exit;
      end;
    end;
  