anchor.diff:      procedure LoadExtra;
   
       property TxtInfo: TKMMapTxtInfo read GetTxtInfo;
  -    property BigDesc: UnicodeString read GetBigDesc write SetBigDesc;
  +    property BigDesc: UnicodeString read GetBigDesc;
       property InfoAmount: TKMMapInfoAmount read fInfoAmount;
       property Dir: string read fDir;
       property Kind: TKMMapKind read fKind;
  
positive.code: end;
  
  
  procedure TKMMapInfo.SetBigDesc(const aBigDesc: UnicodeString);
  begin
    TxtInfo.BigDesc := aBigDesc;
  end;
  
  
  function TKMMapInfo.HasReadme: Boolean;
  begin
    Result := DetermineReadmeFilePath <> '';
  
negative.code:     function GetCanBeOnlyAICount: Byte;
      function GetCanBeHumanAndAICount: Byte;
      function GetBigDesc: UnicodeString;
      function GetTxtInfo: TKMMapTxtInfo;
      function GetDimentions: TKMPoint;
  
  