summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorTakuji Tanaka <ttk@t-lab.opal.ne.jp>2023-04-15 00:49:49 +0000
committerTakuji Tanaka <ttk@t-lab.opal.ne.jp>2023-04-15 00:49:49 +0000
commitff84182c46dc1fb10a6ce9f7add05b54bf6208e0 (patch)
tree44a56a7c7d1d1f204a1787cb24bb7b26ea39f2c9 /Build
parent481f017988608c9795368a691efb5352370fb4c6 (diff)
ptex: update last_jchr in unpackage (H.Kitagawa)
git-svn-id: svn://tug.org/texlive/trunk@66853 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r--Build/source/texk/web2c/ptexdir/ChangeLog5
-rw-r--r--Build/source/texk/web2c/ptexdir/ptex-base.ch6
2 files changed, 9 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ChangeLog b/Build/source/texk/web2c/ptexdir/ChangeLog
index 539efeb1bf3..bebd9cd80df 100644
--- a/Build/source/texk/web2c/ptexdir/ChangeLog
+++ b/Build/source/texk/web2c/ptexdir/ChangeLog
@@ -1,3 +1,8 @@
+2023-04-15 Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
+
+ * ptex-base.ch: Update last_jchr in unpackage.
+ https://github.com/texjporg/tex-jp-build/issues/156
+
2023-03-29 TANAKA Takuji <ttk@t-lab.opal.ne.jp>
* wcfname.test:
diff --git a/Build/source/texk/web2c/ptexdir/ptex-base.ch b/Build/source/texk/web2c/ptexdir/ptex-base.ch
index 26e529b7a66..6f214d5fba5 100644
--- a/Build/source/texk/web2c/ptexdir/ptex-base.ch
+++ b/Build/source/texk/web2c/ptexdir/ptex-base.ch
@@ -5971,8 +5971,10 @@ while link(tail)<>null do
{reset |inhibit_glue_flag| when a node other than |disp_node| is found;
|disp_node| is always inserted according to tex-jp-build issue 40}
begin p:=tail; tail:=link(tail);
- if is_char_node(tail) then
- inhibit_glue_flag:=false
+ if is_char_node(tail) then begin
+ inhibit_glue_flag:=false;
+ if font_dir[font(tail)]<>dir_default then last_jchr:=link(tail);
+ end
else
case type(tail) of
glue_node : begin