anchor.diff:    Frame: TEditorFrame;
     Params: TAppVariantArray;
     Keymap: TATKeymap;
  -  SFileName, SLexerName: string;
  +  {$ifdef debug_on_lexer}
  +  SFileName: string;
  +  {$endif}
  +  SLexerName: string;
   begin
     if Sender is TEditorFrame then
       Frame:= TEditorFrame(Sender)
  
positive.code:     Frame:= (Sender as TComponent).Owner as TEditorFrame;
    Ed:= Frame.Editor;
  
    SFileName:= Frame.GetFileName(Ed);
    SLexerName:= Frame.LexerName[Ed];
  
    ////debug
    //MsgLogConsole('OnLexerChange: file "'+ExtractFileName(SFileName)+'" -> "'+SLexerName+'"');
  
    //load lexer-specific config
    DoOps_LoadOptionsLexerSpecific(Frame, Ed);
  
negative.code:   if not FSessionIsLoading then
      if (SLexerName<>'') or not EditorIsEmpty(Ed) then
      begin
        {$ifdef debug_on_lexer}
        MsgLogConsole('on_lexer: file "'+ExtractFileName(SFileName)+'" -> "'+SLexerName+'"');
        {$endif}
  
        SetLength(Params, 0);
        DoPyEvent(Ed, cEventOnLexer, Params);
  