texlive[45519] Master/texmf-dist/scripts/texlive/tlmgr.pl: tlmgr

[commits+preining at tug.org]

Revision: 45519
          http://tug.org/svn/texlive?view=revision&revision=45519
Author:   preining
Date:     2017-10-11 02:59:10 +0200 (Wed, 11 Oct 2017)
Log Message:
-----------
tlmgr update: add --no-restart option

Modified Paths:
--------------
    trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl

Modified: trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl	2017-10-11 00:17:48 UTC (rev 45518)
+++ trunk/Master/texmf-dist/scripts/texlive/tlmgr.pl	2017-10-11 00:59:10 UTC (rev 45519)
@@ -334,6 +334,7 @@
       "no-auto-remove"             => 1,
       "no-depends"                 => 1,
       "no-depends-at-all"          => 1,
+      "no-restart"                 => 1,
       "reinstall-forcibly-removed" => 1,
       "self" => 1,
     },
@@ -3216,7 +3217,7 @@
   }
 
   my $restart_tlmgr = 0;
-  if ($opts{"self"} && @critical &&
+  if ($opts{"self"} && @critical && !$opts{'no-restart'} &&
       $infra_update_done && $other_updates_asked_for) {
     # weed out the --self argument from the saved arguments
     @::SAVEDARGV = grep (!m/^-?-self$/, @::SAVEDARGV);
@@ -6217,7 +6218,7 @@
         print "OK\n";
       }
       # make sure that we restart after having called update --self!
-      if (($cmd eq 'update') && $opts{'self'}) {
+      if (($cmd eq 'update') && $opts{'self'} && !$opts{'no-restart'}) {
         print "tlmgr has been updated, restarting!\n";
         exec("tlmgr", @::SAVEDARGV);
       }