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

[commits+preining at tug.org]

Revision: 58769
          http://tug.org/svn/texlive?view=revision&revision=58769
Author:   preining
Date:     2021-04-06 13:16:53 +0200 (Tue, 06 Apr 2021)
Log Message:
-----------
fmtutil.pl: work around Windows kpsewhich incompatibility

patch by Akira Kakuto

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-04-06 10:39:46 UTC (rev 58768)
+++ trunk/Master/texmf-dist/scripts/texlive/fmtutil.pl	2021-04-06 11:16:53 UTC (rev 58769)
@@ -379,8 +379,11 @@
 
   # code taken over from the original shell script for KPSE_DOT etc
   my $thisdir = cwd();
-  $ENV{'KPSE_DOT'} = $thisdir;
-
+  if (win32()) {
+    $ENV{'KPSE_DOT'} = "$thisdir$sep.";
+  } else {
+    $ENV{'KPSE_DOT'} = $thisdir;
+  }
   # due to KPSE_DOT, we don't search the current directory, so include
   # it explicitly for formats that \write and later on \read
   $ENV{'TEXINPUTS'} ||= "";