texlive[59983] Master/texmf-dist/scripts/texlive/fmtutil.pl: (sorry,

[commits+karl at tug.org]

Revision: 59983
          http://tug.org/svn/texlive?view=revision&revision=59983
Author:   karl
Date:     2021-07-19 00:18:08 +0200 (Mon, 19 Jul 2021)
Log Message:
-----------
(sorry, that last log message was supposed to be:)
replace File::Copy calls with TeXLive::TLUtils::copy("-f")
since Fedora (it seems) doesn't provide File::Copy.
Reports from Murpholino Peligro 21 May 2021 13:07:16,
and John Gill 18 Jul 2021 13:55:02.

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	2021-07-18 22:13:22 UTC (rev 59982)
+++ trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl	2021-07-18 22:18:08 UTC (rev 59983)
@@ -860,34 +860,33 @@
     $first_time_creation_in_usermode = $possibly_warn;
     #
     # original fmtutil.sh did some magic trick for mplib-luatex.mem
-    #
     # nowadays no mplib mem is created and all files loaded
     # so we comment and do not convert this
     #
-    # As a special special case, we create mplib-luatex.mem for use by
-    # the mplib embedded in luatex if it doesn't already exist.  (We
-    # never update it if it does exist.)
-    #
-    # This is used by the luamplib package.  This way, an expert user
-    # who wants to try a new version of luatex (hence with a new
-    # version of mplib) can manually update mplib-luatex.mem without
-    # having to tamper with mpost itself.
-    #
-    #  if test "x$format" = xmpost && test "x$engine" = xmpost; then
-    #    mplib_mem_name=mplib-luatex.mem
-    #    mplib_mem_file=$fulldestdir/$mplib_mem_name
-    #    if test \! -f $mplib_mem_file; then
-    #      verboseMsg "$progname: copying $destfile to $mplib_mem_file"
-    #      if cp "$destfile" "$mplib_mem_file" </dev/null; then
-    #        mktexupd "$fulldestdir" "$mplib_mem_name"
-    #      else
-    #        # failure to copy merits failure handling: e.g., full file system.
-    #        log_failure "cp $destfile $mplib_mem_file failed."
-    #      fi
-    #    else
-    #      verboseMsg "$progname: $mplib_mem_file already exists, not updating."
-    #    fi
-    #  fi
+    ## As a special special case, we create mplib-luatex.mem for use by
+    ## the mplib embedded in luatex if it doesn't already exist.  (We
+    ## never update it if it does exist.)
+    ##
+    ## This is used by the luamplib package.  This way, an expert user
+    ## who wants to try a new version of luatex (hence with a new
+    ## version of mplib) can manually update mplib-luatex.mem without
+    ## having to tamper with mpost itself.
+    ##
+    ##  if test "x$format" = xmpost && test "x$engine" = xmpost; then
+    ##    mplib_mem_name=mplib-luatex.mem
+    ##    mplib_mem_file=$fulldestdir/$mplib_mem_name
+    ##    if test \! -f $mplib_mem_file; then
+    ##      verboseMsg "$progname: copying $destfile to $mplib_mem_file"
+    ##      if cp "$destfile" "$mplib_mem_file" </dev/null; then
+    ##        mktexupd "$fulldestdir" "$mplib_mem_name"
+    ##      else
+    ##        ## failure to copy merits failure handling: e.g., full file system.
+    ##        log_failure "cp $destfile $mplib_mem_file failed."
+    ##      fi
+    ##    else
+    ##      verboseMsg "$progname: $mplib_mem_file already exists, not updating."
+    ##    fi
+    ##  fi
 
     if ($mktexfmtMode && $mktexfmtFirst) {
       print "$destfile\n";