diff options
Diffstat (limited to 'Build/source/texk/web2c/uptexdir')
| -rw-r--r-- | Build/source/texk/web2c/uptexdir/ChangeLog | 5 | ||||
| -rw-r--r-- | Build/source/texk/web2c/uptexdir/upbibtex.ch | 6 | ||||
| -rwxr-xr-x | Build/source/texk/web2c/uptexdir/upbibtex.test | 2 |
3 files changed, 13 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/uptexdir/ChangeLog b/Build/source/texk/web2c/uptexdir/ChangeLog index 9c661f32c90..86b43c5918d 100644 --- a/Build/source/texk/web2c/uptexdir/ChangeLog +++ b/Build/source/texk/web2c/uptexdir/ChangeLog @@ -1,3 +1,8 @@ +2022-05-06 TANAKA Takuji <ttk@t-lab.opal.ne.jp> + + * upbibtex.ch: Fix bug on kpse_set_progname. + * upbibtex.test: Update a test. + 2022-03-21 Karl Berry <karl@tug.org> * TL'22 release. 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; diff --git a/Build/source/texk/web2c/uptexdir/upbibtex.test b/Build/source/texk/web2c/uptexdir/upbibtex.test index 715608c56d3..9a12a72cb04 100755 --- a/Build/source/texk/web2c/uptexdir/upbibtex.test +++ b/Build/source/texk/web2c/uptexdir/upbibtex.test @@ -5,6 +5,7 @@ # You may freely use, modify and/or distribute this file. test -d uptests || mkdir -p uptests +rm -f uptests/xexampl.* cp $srcdir/tests/exampl.aux uptests/xexampl.aux @@ -12,4 +13,5 @@ TEXMFCNF=$srcdir/../kpathsea \ BSTINPUTS=$srcdir/tests \ BIBINPUTS=$srcdir/tests \ ./upbibtex uptests/xexampl || exit 1 +diff $srcdir/tests/exampl.bbl uptests/xexampl.bbl || exit 2 |