anchor.diff:    FInHistory:= sCarets<>'';
     if not FInHistory then exit;
   
  +  {
     //markers
  +  //it's bad to save markers along with other history items,
  +  //so this is commented
     Ed.Markers.AsString:= c.GetValue(path+cHistory_Markers, '');
  +  }
   
     //lexer
     str0:= LexerName[Ed];
  
positive.code:     if ACaret then
        cfg.DeleteValue(path+cHistory_Caret);
  
      if AMarkers then
        cfg.DeleteValue(path+cHistory_Markers);
  
    finally
      FreeAndNil(cfg);
  
negative.code:   cHistory_Unpri_Ends   = '/unprinted_ends';
    cHistory_Unpri_Detail = '/unprinted_end_details';
    cHistory_Caret       = '/crt';
    //cHistory_Markers     = '/mrk';
    cHistory_TabColor    = '/color';
    cHistory_Bookmark    = '/bm';
    cHistory_BookmarkKind = '/bm_kind';
  