diff options
Diffstat (limited to 'Build/source/texk/web2c/euptexdir')
-rw-r--r-- | Build/source/texk/web2c/euptexdir/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/euptexdir/euptex.ch1 | 9 |
2 files changed, 9 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/euptexdir/ChangeLog b/Build/source/texk/web2c/euptexdir/ChangeLog index 9ffbaca5d3a..f3321ea24d5 100644 --- a/Build/source/texk/web2c/euptexdir/ChangeLog +++ b/Build/source/texk/web2c/euptexdir/ChangeLog @@ -1,3 +1,7 @@ +2014-11-19 Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp> + + * euptex.ch1: Fix a bug introduced in the primitive \lastnodechar. + 2014-11-09 Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp> * euptex.ch1: Improve the new primitive \lastnodechar. diff --git a/Build/source/texk/web2c/euptexdir/euptex.ch1 b/Build/source/texk/web2c/euptexdir/euptex.ch1 index 9330be8ff54..14550ad64c5 100644 --- a/Build/source/texk/web2c/euptexdir/euptex.ch1 +++ b/Build/source/texk/web2c/euptexdir/euptex.ch1 @@ -7,15 +7,16 @@ @z @x -else if font_dir[font(tx)]<>dir_default then cur_val:=info(link(tx)) +else if font_dir[font(tx)]<>dir_default then cur_val:=KANJI(info(link(tx))) @y -else if font_dir[font(tx)]<>dir_default then cur_val:=info(link(tx)) mod max_cjk_val +else if font_dir[font(tx)]<>dir_default then cur_val:=KANJI(info(link(tx))) mod max_cjk_val @z @x - else if font_dir[font(tx)]<>dir_default then cur_val:=info(link(tx)) + begin if font_dir[font(tx)]<>dir_default then cur_val:=KANJI(info(link(tx))) @y - else if font_dir[font(tx)]<>dir_default then cur_val:=info(link(tx)) mod max_cjk_val + begin if font_dir[font(tx)]<>dir_default then cur_val:=KANJI(info(link(tx))) mod max_cjk_val + {it seems that |mod max_cjk_val| is not necessary in the above line, but why?} @z @x e-pTeX: ifcsname l.28620 |