diff options
-rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui.pl index 8874f83df45..af1f923579e 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui.pl @@ -530,6 +530,21 @@ sub setup_menu_system { } $mw->Unbusy; }); + + if (TeXLive::TLUtils::which("mkluatexfontdb-sys")) { + $menu_actions->add('command', -label => __("Update luaTeX font database"), + -state => $::action_button_state, + -command => sub { + $mw->Busy(-recurse => 1); + info("Running mkluatexfontdb-sys, this may take some time ...\n"); + for my $l (`mkluatexfontdb-sys 2>&1`) { + info($l); + $mw->update; + } + $mw->Unbusy; + }); + + } $menu_actions->add('command', -label => __("Restore packages from backup") . " ...", |