UPD: Don't show '*' in the tabs list menu (issues #1890, #1784)

(cherry picked from commit c13e3a07e6)
This commit is contained in:
Alexander Koblov 2024-10-05 18:39:59 +03:00
commit fbfbce839c

View file

@ -1815,6 +1815,11 @@ begin
MenuItem:= TMenuItem.Create(FTabsMenu);
MenuItem.Tag:= Index;
MenuItem.Caption:= ANotebook.Page[Index].Caption;
if (ANotebook.Page[Index].LockState in [tlsPathLocked, tlsPathResets, tlsDirsInNewTab]) and
(tb_show_asterisk_for_locked in gDirTabOptions) then
begin
MenuItem.Caption:= Copy(MenuItem.Caption, 2, MaxInt);
end;
MenuItem.OnClick:= @DoTabMenuClick;
FTabsMenu.Items.Add(MenuItem);
end;