summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xMaster/texmf/scripts/texlive/tl-package-manager.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/Master/texmf/scripts/texlive/tl-package-manager.pl b/Master/texmf/scripts/texlive/tl-package-manager.pl
index f3ea8c3ab82..0fda2b2f1c6 100755
--- a/Master/texmf/scripts/texlive/tl-package-manager.pl
+++ b/Master/texmf/scripts/texlive/tl-package-manager.pl
@@ -66,13 +66,18 @@ GetOptions("location=s" => \$opt_location,
"dry-run" => \$opt_dry,
"debug!", "h|help|?" => \$opt_help) or pod2usage(1);
+my $action = shift;
+if (!defined($action)) {
+ # no argument given
+ $opt_help = 1;
+}
+
if ($^O=~/^MSWin(32|64)$/i) {
pod2usage(-exitstatus => 0, -verbose => 2, -noperldoc => 1) if $opt_help;
} else {
pod2usage(-exitstatus => 0, -verbose => 2) if $opt_help;
}
-my $action = shift;
if ($opt_debug) {
$::LOGLEVELFILE = $::LOG_DDDEBUG;