anchor.diff:        if (UiOps.MaxLineLenForEditingKeepingLexer>0) and
           (St.LinesLen[Caret.PosY]>=UiOps.MaxLineLenForEditingKeepingLexer) then
           begin
  -          Ed.AdapterForHiliteBackup:= Ed.AdapterForHilite;
  +          FLexerBackup[EditorObjToIndex(Ed)]:= Ed.AdapterForHilite;
             Ed.AdapterForHilite:= nil;
   
             if Splitted and EditorsLinked then
             begin
  -           EdOther.AdapterForHiliteBackup:= EdOther.AdapterForHilite;
  +           FLexerBackup[EditorObjToIndex(EdOther)]:= EdOther.AdapterForHilite;
              EdOther.AdapterForHilite:= nil;
             end;
   
  
positive.code:     FSaveHistory: boolean;
      FEditorsLinked: boolean;
      FCachedTreeview: array[0..1] of TTreeView;
      FLexerChooseFunc: TecLexerChooseFunc;
      FLexerNameBackup: string;
      FBracketHilite: boolean;
  
negative.code: end;
  
  procedure TEditorFrame.RestoreSavedLexer(Ed: TATSynEdit);
  var
    EdIndex: integer;
    Ada: TATAdapterHilite;
  begin
    EdIndex:= EditorObjToIndex(Ed);
    Ada:= FLexerBackup[EdIndex];
    if Assigned(Ada) then
    begin
      Ed.AdapterForHilite:= Ada;
      FLexerBackup[EdIndex]:= nil;
      Ed.Update;
      DoOnUpdateStatusbar; //replace lexer name 'none' to restored one
    end;
  