anchor.diff:      procedure DoSaveUndo(Ed: TATSynEdit; const AFileName: string);
       procedure DoLoadUndo(Ed: TATSynEdit);
       procedure DoSaveHistory_Caret(Ed: TATSynEdit; c: TJsonConfig; const path: UnicodeString);
  -    procedure DoSaveHistory_Bookmarks(Ed: TATSynEdit; c: TJsonConfig; const path: UnicodeString; AForSession: boolean);
  +    procedure DoSaveHistory_Bookmarks(Ed: TATSynEdit; c: TJsonConfig; const path: UnicodeString);
   
     protected
       procedure DoOnResize; override;
  
positive.code:   if AAllowLoadUndo then
      DoLoadUndo(Ed);
  
    if AAllowLoadHistory then
      DoLoadHistory(Ed, AAllowLoadHistoryEnc);
  
    //save temp-options, to later know which options are changed,
    //during loading of lexer-specific config
  
negative.code: var
    SKey, SValue: UnicodeString;
  begin
    if Ed.FileName<>'' then
    begin
      SKey:= AppConfigKeyForBookmarks(Ed);
  