diff options
Diffstat (limited to 'Master/texmf-dist/scripts')
-rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 18 | ||||
-rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgrgui.pl | 1 |
2 files changed, 18 insertions, 1 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index ac972a97605..4be54db0de0 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -187,7 +187,23 @@ my %action_specification = ( "function" => \&action_get_mirror }, "gui" => { - "options" => { "load" => 1 }, + "options" => { + "load" => 1, + # Tk::CmdLine options + "font" => "=s", + "background" => "=s", + "class" => "=s", + "display" => "=s", + "screen" => "=s", + "foreground" => "=s", + "geometry" => "=s", + "name" => "=s", + "title" => "=s", + "xrm" => "=s", + "iconic" => 1, + "motif" => 1, + "synchronous" => 1, + }, "run-post" => 1, "function" => \&action_gui }, diff --git a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl index 09b80a6df17..bad08f0f6a2 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl @@ -242,6 +242,7 @@ sub guimain { ############## GUI ######################## sub build_initial_gui { + Tk::CmdLine::SetArguments(@::SAVEDARGV); $mw = MainWindow->new; $mw->title("TeX Live Manager $TeXLive::TLConfig::ReleaseYear"); $mw->withdraw; |