anchor.diff:    Ed: TATSynEdit;
     ItemProp: TATListboxItemProp;
     Params: TAppVariantArray;
  +  Frame: TEditorFrame;
   begin
     Ed:= CurrentEditor;
   
  
positive.code:     procedure DoOps_LoadOptions_Ui(cfg: TJSONConfig);
      procedure ShowWelcomeInfo;
      procedure DoOps_OnCreate;
      function FindFrameOfFilename(const AName: string): TEditorFrame;
      function FindFrameOfPreviewTab: TEditorFrame;
      procedure FixMainLayout;
      procedure FormFloatGroups1_OnEmpty(Sender: TObject);
  
negative.code: end;
  
  
  function TfmMain.FindFrameOfFilename(const AFileName: string): TEditorFrame;
  var
    Frame: TEditorFrame;
    bEmptyPath, bOK: boolean;
    i: integer;
  begin
    Result:= nil;
    if AFileName='' then exit;
    bEmptyPath:= ExtractFileDir(AFileName)='';
  
    for i:= 0 to FrameCount-1 do
    begin
      Frame:= Frames[i];
      if bEmptyPath then
      begin
        bOK:= SameFileName(AFileName, ExtractFileName(Frame.FileName));
        if not bOK then
          if not Frame.EditorsLinked then
            bOK:= SameFileName(AFileName, ExtractFileName(Frame.FileName2));
      end
      else
      begin
        bOK:= SameFileName(AFileName, Frame.FileName);
        if not bOK then
          if not Frame.EditorsLinked then
            bOK:= SameFileName(AFileName, Frame.FileName2);
      end;
      if bOK then
        exit(Frame);
    end;
  end;
  
  