diff --git a/source/texk/web2c/uptexdir/pfname.test b/source/texk/web2c/uptexdir/pfname.test
index 1cd80d165..ae1b59822 100755
--- a/source/texk/web2c/uptexdir/pfname.test
+++ b/source/texk/web2c/uptexdir/pfname.test
@@ -73,13 +73,20 @@ for doc in fn①㎝Ⅶ閒ｱ-$fenc; do
   if [ "$COMSPEC" != "" ]; then
     echo "*** We guess OS is Windows."
     if [ $fenc != euc ]; then ienc="sjis"; fi
+    if [ $ienc = uptex ]; then
+      command_line_encoding=utf8
+      export command_line_encoding
+    else
+      command_line_encoding=none
+      export command_line_encoding
+    fi
   else
     echo "*** We guess OS is not Windows."
     if [ $fenc != sjis ]; then ienc="euc"; fi
   fi
 
   echo '>>> Document:'$doc '  File Encoding:'$fenc '  Internal Encoding:'$ienc
-  ./ptex -ini -interaction nonstopmode -jobname=$doc-$ienc -kanji=$fenc --kanji-internal=$ienc $doc.tex >uptests/$doc-$fenc-term.log || $rc=3
+  ./uptex -ini -interaction nonstopmode -jobname=$doc-$ienc -kanji=$fenc --kanji-internal=$ienc $doc.tex >uptests/$doc-$fenc-term.log || $rc=3
   mv $doc-$ienc.txt $doc-$ienc.log uptests/
   diff uptests/$doc-$ienc.txt $srcdir/ptexdir/tests/fn-$fenc.txt || $rc=4