texlive[45872] Master/texmf-dist/scripts/texlive/fmtutil.pl: fmtutil

commits+preining at tug.org commits+preining at tug.org
Tue Nov 21 08:07:45 CET 2017


Revision: 45872
          http://tug.org/svn/texlive?view=revision&revision=45872
Author:   preining
Date:     2017-11-21 08:07:45 +0100 (Tue, 21 Nov 2017)
Log Message:
-----------
fmtutil missing/refresh part 3: support missing and refresh

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

Modified: trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl	2017-11-21 07:07:36 UTC (rev 45871)
+++ trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl	2017-11-21 07:07:45 UTC (rev 45872)
@@ -436,9 +436,12 @@
     }
   }
 
-  # if the user asked to rebuild something, but we did nothing, report.
-  if ($err + $suc == 0) {
-    print_info("did not find entry for $what=$whatarg, skipped\n");
+  # if the user asked to rebuild something, but we did nothing, report
+  # unless we tried to rebuild only missing formats.
+  if ($what ne "missing") {
+    if ($err + $suc == 0) {
+      print_info("did not find entry for $what=$whatarg, skipped\n");
+    }
   }
   my $stdo = ($mktexfmtMode ? \*STDERR : \*STDOUT);
   for (@deferred_stdout) { print $stdo $_; }
@@ -474,8 +477,8 @@
   # we just identify 'all', 'refresh', 'missing'
   # I don't see much point in keeping all of them
   $doit = 1 if ($what eq 'all');
-  $doit = 1 if ($what eq 'refresh');
-  $doit = 1 if ($what eq 'missing');
+  $doit = 1 if ($what eq 'refresh' && -r "$destdir/$fmtfile");
+  $doit = 1 if ($what eq 'missing' && ! -r "$destdir/$fmtfile");
   $doit = 1 if ($what eq 'byengine' && $eng eq $whatarg);
   $doit = 1 if ($what eq 'byfmt' && $fmt eq $whatarg);
   # TODO



More information about the tex-live-commits mailing list