summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/uptexdir/upbibtex.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/uptexdir/upbibtex.ch')
-rw-r--r--Build/source/texk/web2c/uptexdir/upbibtex.ch6
1 files changed, 6 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/uptexdir/upbibtex.ch b/Build/source/texk/web2c/uptexdir/upbibtex.ch
index b8b72a47634..11f47487084 100644
--- a/Build/source/texk/web2c/uptexdir/upbibtex.ch
+++ b/Build/source/texk/web2c/uptexdir/upbibtex.ch
@@ -347,6 +347,12 @@ incr(current_option);
@ An element with all zeros always ends the list.
@z
+@x
+begin kpse_set_program_name (argv[0], 'pbibtex');
+@y
+begin kpse_set_program_name (argv[0], 'upbibtex');
+@z
+
@x procedure x_is_kanji_str
procedure x_is_kanji_str;
label exit;