summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgr.pl18
-rwxr-xr-xMaster/texmf-dist/scripts/texlive/tlmgrgui.pl1
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;