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

[commits+karl at tug.org]

Revision: 68715
          https://tug.org/svn/texlive?view=revision&revision=68715
Author:   karl
Date:     2023-11-01 18:28:01 +0100 (Wed, 01 Nov 2023)
Log Message:
-----------
(callback_build_formats): set whatarg to the empty
string if it's undefined (as it is for the
invocations from "missing" and "all").
(Called with --all from, e.g., tlmgr paper letter.)
Report and analysis from Mike Maxwell,
https://tug.org/pipermail/tex-live/2023-September/049526.html

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	2023-11-01 00:43:35 UTC (rev 68714)
+++ trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl	2023-11-01 17:28:01 UTC (rev 68715)
@@ -383,6 +383,11 @@
 sub callback_build_formats {
   my ($what, $whatarg) = @_;
 
+  # sometimes (missing, all) there is no argument passed.
+  # Avoid warning from undef value being logged.
+  # https://tug.org/pipermail/tex-live/2023-September/049526.html
+  $whatarg = "" if ! defined $whatarg;
+
   # set up a tmp dir
   # On W32 it seems that File::Temp creates restrictive permissions (ok)
   # that are copied over with the files created inside it (not ok).
@@ -1478,7 +1483,7 @@
   --force                 (does nothing, exists for compatibility)
   --test                  (does nothing, exists for compatibility)
 
-Commands:
+Commands (exactly one must be specified):
   --all                   recreate all format files
   --missing               create all missing format files
   --byengine ENGINE       (re)create formats built with ENGINE