anchor.diff:    DoInvalidateEditors;
   end;
   
  +
  +function TfmMain.IsAllowedToOpenFileNow: boolean;
  +begin
  +  Result:= true;
  +  if IsDialogCustomShown then exit(false);
  +  if Assigned(fmCommands) and fmCommands.Visible then fmCommands.Close;
  +end;
  +
   procedure TfmMain.UniqInstanceOtherInstance(Sender: TObject;
     ParamCount: Integer; Parameters: array of String);
   var
     FStyle: TFormStyle;
     i: integer;
   begin
  -  //don't open files if modal form shown
  -  if IsDialogCustomShown then exit;
  -  if Assigned(fmCommands) and fmCommands.Visible then exit;
  -  //----
  +  if not IsAllowedToOpenFileNow then exit;
   
     for i:= 0 to ParamCount-1 do
       if FileExistsUTF8(Parameters[i]) then
  
positive.code:   Pages: TATPages;
    i: integer;
  begin
    //set group according to mouse cursor
    Pages:= nil;
    for i in [Low(TATGroupsNums)..High(TATGroupsNums)] do
  
negative.code:     procedure FrameLexerChange(Sender: TObject);
      procedure FrameOnEditorClickEndSelect(Sender: TObject; APrevPnt, ANewPnt: TPoint);
      procedure FrameOnEditorClickMoveCaret(Sender: TObject; APrevPnt, ANewPnt: TPoint);
      function IsAllowedToOpenFileNow: boolean;
      procedure MenuEncWithReloadClick(Sender: TObject);
      procedure MenuLangClick(Sender: TObject);
      procedure MsgStatusAlt(const S: string; const NSeconds: integer);
  