anchor.diff:    cMaxLen = 150;
   var
     Ed: TATSynEdit;
  -  Form: TfmMenuList;
  -  Num, NumMax: integer;
     items: TStringList;
     bm: TATBookmarkItem;
     strInfo, strKind, strCaption: string;
  -  NLine, NKind, i: integer;
  +  NumMax, NLine, NKind, i: integer;
  +  Obj: TObject;
   begin
     Ed:= CurrentEditor;
     NumMax:= Ed.Strings.Count-1;
  
positive.code:       Exit;
      end;
  
      Num:= -1;
      Form:= TfmMenuList.Create(Self);
      try
        UpdateInputForm(Form);
        Form.Caption:= strCaption;
        Form.Items:= items;
        Form.ShowModal;
        if Form.ResultIndex>=0 then
          Num:= PtrInt(items.Objects[Form.ResultIndex]);
      finally
        FreeAndNil(Form);
      end;
    finally
      FreeAndNil(items);
    end;
  
    if Num<0 then
      begin MsgStatus(msgStatusCancelled); Exit end;
    if Num>NumMax then
      Num:= NumMax;
  
    Ed.DoGotoPos(
      Point(0, Num),
      Point(-1, -1),
      UiOps.FindIndentHorz,
      UiOps.FindIndentVert,
  
negative.code:     function DoDialogCommands_Py(AShowUsual, AShowPlugins, AShowLexers,
        AAllowConfig, AShowCentered: boolean; ACaption: string): string;
      procedure DoDialogGoto;
      function DoDialogMenuList(const ACaption: string; AItems: TStringList; out
        AItemIndex: integer; out AItemObject: TObject): boolean;
      procedure DoDialogGotoBookmark;
      function DoDialogSaveTabs: boolean;
      procedure DoDialogLexerProp(an: TecSyntAnalyzer);
  