diff options
Diffstat (limited to 'Master/texmf')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 8 | ||||
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index dd765ea315d..d042b118b9d 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -1082,7 +1082,7 @@ sub init_local_db { } sub action_gui { - my ($screen) = @_; + my ($guiscreen) = @_; my $perlbin = "perl"; my $perlbinquote = "perl"; my $perlscript = "$Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl"; @@ -1105,11 +1105,11 @@ sub action_gui { push @cmdline, "-v" if ($::opt_verbosity > 0); push @cmdline, "-v" if ($::opt_verbosity > 1); push @cmdline, "-q" if ($::opt_quiet > 0); - if (defined($screen)) { - if (($screen eq "install") || ($screen eq "update")) { + if (defined($guiscreen)) { + if (($guiscreen eq "install") || ($guiscreen eq "update")) { push @cmdline, "--load"; } - push @cmdline, "--screen", $screen; + push @cmdline, "--guiscreen", $guiscreen; } exec $perlbin @cmdline; die("Cannot execute the GUI script\n"); diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl index 272cba0cbb8..aababa9d4fb 100755 --- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui-real.pl @@ -152,7 +152,7 @@ TeXLive::TLUtils::process_logging_options(); GetOptions("location=s" => \$opt_location, "netarchive=s" => \$NetArchive, "diskarchive=s" => \$DiskArchive, - "screen=s" => \$opt_screen, + "guiscreen=s" => \$opt_screen, "force" => \$opt_force, "load" => \$opt_load, "lang=s" => \$opt_lang, |