anchor.diff:    UpdateMenuItemHint(mnuLang, '_langs');
   end;
   
  +procedure TfmMain.DoCloseAllTabs(AAllowEvent, AWithCancelBtn: boolean);
  +var
  +  Tabs: TATTabs;
  +  nGroup, nTab: integer;
  +begin
  +  for nGroup:= High(TATGroupsNums) to Low(TATGroupsNums) do
  +  begin
  +    Tabs:= Groups.Pages[nGroup].Tabs;
  +    for nTab:= Tabs.TabCount-1 downto 0 do
  +      Tabs.DeleteTab(nTab, AAllowEvent, AWithCancelBtn);
  +  end;
  +end;
  +
   procedure TfmMain.FormClose(Sender: TObject; var CloseAction: TCloseAction);
   var
     F: TEditorFrame;
  
positive.code:     F.Editor2.AdapterForHilite:= nil;
      F.Adapter.Stop;
    end;
  end;
  
  procedure TfmMain.ButtonCancelClick(Sender: TObject);
  
negative.code:   //after UpdateMenuRecent
    DoOps_SaveHistory;
  
    for i:= FrameCount-1 downto 0 do
    begin
      F:= Frames[i];
      //make sure adapters don't block closing
  