diff options
Diffstat (limited to 'Build/source/texk/web2c/ptexdir/ptex-base.ch')
-rw-r--r-- | Build/source/texk/web2c/ptexdir/ptex-base.ch | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ptex-base.ch b/Build/source/texk/web2c/ptexdir/ptex-base.ch index 7bf3a25f1c6..ea83b1719c2 100644 --- a/Build/source/texk/web2c/ptexdir/ptex-base.ch +++ b/Build/source/texk/web2c/ptexdir/ptex-base.ch @@ -6925,7 +6925,9 @@ end; @<Append KANJI-character |cur_chr| ...@>= if is_char_node(tail) then - begin cx:=qo(character(tail)); @<Insert |post_break_penalty|@>; + begin if not( (last_jchr<>null) and (link(last_jchr)=tail) ) then + begin cx:=qo(character(tail)); @<Insert |post_break_penalty|@>; + end; end else if type(tail)=ligature_node then begin cx:=qo(character(lig_char(tail))); @<Insert |post_break_penalty|@>; |