diff options
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index 82790b003e8..02a260b53df 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -1570,7 +1570,7 @@ sub action_update { my @todo; if ($opts{"list"}) { @todo = $localtlpdb->list_packages; - } elsif ($opts{"self"}) { + } elsif ($opts{"self"} && @critical) { @todo = @critical; } elsif ($opts{"all"}) { @todo = $localtlpdb->list_packages; @@ -1579,7 +1579,11 @@ sub action_update { } # don't do anything if we have been invoced in a strange way if (!@todo) { - tlwarn("tlmgr update: please specify a list of packages or --all.\n"); + if ($opts{"self"}) { + info("tlmgr: no updates for tlmgr present.\n"); + } else { + tlwarn("tlmgr update: please specify a list of packages or --all.\n"); + } } if (!$opts{"self"}) { @@ -1973,7 +1977,8 @@ sub action_update { } my $restart_tlmgr = 0; - if ($opts{"self"} && $infra_update_done && $other_updates_asked_for) { + if ($opts{"self"} && @critical && + $infra_update_done && $other_updates_asked_for) { # weed out the --self argument from the saved arguments @::SAVEDARGV = grep (!m/^-?-self$/, @::SAVEDARGV); $restart_tlmgr = 1; |