diff options
| -rw-r--r-- | Build/source/texk/web2c/ptexdir/ChangeLog | 5 | ||||
| -rw-r--r-- | Build/source/texk/web2c/ptexdir/ptex-base.ch | 6 |
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 |