anchor.diff:    SFileName: string;
     {$endif}
     SLexerName: string;
  +  bDisFree: boolean;
   begin
     Ed:= Sender;
     Frame:= GetEditorFrame(Ed);
     if Frame=nil then exit;
  +
  +  bDisFree:= FShowFullScreen and FShowFullScreen_DisFree;
   
     {$ifdef debug_on_lexer}
     SFileName:= Frame.GetFileName(Ed);
  
positive.code:     Ed.Keymap:= Keymap;
  
    UpdateMenuPlugins_Shortcuts;
  end;
  
  
  
negative.code:     FFindMarkingMode: TATFindMarkingMode;
      FFindMarkingCaret1st: boolean;
      FShowFullScreen: boolean;
      FShowFullScreen_DisFree: boolean;
      FOrigBounds: TRect;
      FOrigWndState: TWindowState;
      FOrigShowToolbar: boolean;
  