From 78593154cfb96b1326e769d080a178770a12817c Mon Sep 17 00:00:00 2001 From: Takuji Tanaka Date: Tue, 17 May 2022 13:08:34 +0000 Subject: bibtex-x: fix a bug on text.length$ git-svn-id: svn://tug.org/texlive/trunk@63318 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/bibtex-x/ChangeLog | 2 +- Build/source/texk/bibtex-x/bibtex-4.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'Build') diff --git a/Build/source/texk/bibtex-x/ChangeLog b/Build/source/texk/bibtex-x/ChangeLog index 80058592123..03d93d838a7 100644 --- a/Build/source/texk/bibtex-x/ChangeLog +++ b/Build/source/texk/bibtex-x/ChangeLog @@ -3,7 +3,7 @@ * version.h: Bump version to 4.00 (17 may 2022). * bibtex-4.c, bibtex.h: - Fix a bug of text.prefix$ in bibtexu. + Fix a bug of text.prefix$ and text.length$ in bibtexu. * tests/testsubstr[au].bib, substr[au].bbl, txtprfx[au].bbl: Update tests. diff --git a/Build/source/texk/bibtex-x/bibtex-4.c b/Build/source/texk/bibtex-x/bibtex-4.c index cd2b5811cc5..9663f5a6b8c 100644 --- a/Build/source/texk/bibtex-x/bibtex-4.c +++ b/Build/source/texk/bibtex-x/bibtex-4.c @@ -2266,7 +2266,7 @@ BEGIN /* The length of character of UTF-8 is different. 23/sep/2009 */ - DO_UTF8(str_pool[sp_ptr], , sp_ptr++, sp_ptr += 2, sp_ptr += 3); + DO_UTF8(str_pool[sp_ptr-1], , sp_ptr++, sp_ptr += 2, sp_ptr += 3); #endif INCR (num_text_chars); END -- cgit v1.2.3