texlive[65389] Build/source/texk/web2c: (u)ptex: tests for filenam,

[commits+takuji at tug.org]

Revision: 65389
          http://tug.org/svn/texlive?view=revision&revision=65389
Author:   takuji
Date:     2022-12-29 00:41:03 +0100 (Thu, 29 Dec 2022)
Log Message:
-----------
(u)ptex: tests for filenam, find & set UTF-8 locale

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ptexdir/wcfname.test
    trunk/Build/source/texk/web2c/uptexdir/wcfname.test

Modified: trunk/Build/source/texk/web2c/ptexdir/wcfname.test
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/wcfname.test	2022-12-28 22:31:17 UTC (rev 65388)
+++ trunk/Build/source/texk/web2c/ptexdir/wcfname.test	2022-12-28 23:41:03 UTC (rev 65389)
@@ -12,7 +12,14 @@
 TEXINPUTS=ptests:.
 export TEXMFCNF TEXINPUTS
 
-LC_ALL=C.UTF-8; LANGUAGE=C.UTF-8; export LC_ALL LANGUAGE
+for loc in C.UTF-8 C.utf8 en_US.UTF-8 en_US.utf8 ja_JP.UTF-8 ja_JP.utf8; do
+  locale -a | grep $loc
+  ret=$?
+  if [ $ret = 0 ]; then
+    LC_ALL=$loc; LANGUAGE=$loc; export LC_ALL LANGUAGE
+    break
+  fi
+done
 
 perl $srcdir/tests/fn-generate.perl || exit 128
 mv fn*.tex ptests/

Modified: trunk/Build/source/texk/web2c/uptexdir/wcfname.test
===================================================================
--- trunk/Build/source/texk/web2c/uptexdir/wcfname.test	2022-12-28 22:31:17 UTC (rev 65388)
+++ trunk/Build/source/texk/web2c/uptexdir/wcfname.test	2022-12-28 23:41:03 UTC (rev 65389)
@@ -12,7 +12,14 @@
 TEXINPUTS=uptests:.
 export TEXMFCNF TEXINPUTS
 
-LC_ALL=C.UTF-8; LANGUAGE=C.UTF-8; export LC_ALL LANGUAGE
+for loc in C.UTF-8 C.utf8 en_US.UTF-8 en_US.utf8 ja_JP.UTF-8 ja_JP.utf8; do
+  locale -a | grep $loc
+  ret=$?
+  if [ $ret = 0 ]; then
+    LC_ALL=$loc; LANGUAGE=$loc; export LC_ALL LANGUAGE
+    break
+  fi
+done
 
 perl $srcdir/tests/fn-generate.perl || exit 128
 mv fn*.tex uptests/