diff options
| author | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2020-02-09 13:11:10 +0000 |
|---|---|---|
| committer | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2020-02-09 13:11:10 +0000 |
| commit | 02d4e9d264baca06647248bfd11f953aa1776ceb (patch) | |
| tree | a2f04b0618d113b070980034f479228ff66d51a8 | |
| parent | ad829acb5e5b0906b355c6a94df7c203d9b86217 (diff) | |
more fix for fetching \kansujichar
git-svn-id: svn://tug.org/texlive/trunk@53727 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Build/source/texk/web2c/ptexdir/ptex-base.ch | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ptex-base.ch b/Build/source/texk/web2c/ptexdir/ptex-base.ch index 6e317cc3a15..56b85ce5486 100644 --- a/Build/source/texk/web2c/ptexdir/ptex-base.ch +++ b/Build/source/texk/web2c/ptexdir/ptex-base.ch @@ -6422,14 +6422,14 @@ else end; @ @<Fetch kansuji char code from some table@>= -begin scan_int; +begin scan_int; cur_val_level:=int_val; if (cur_val<0)or(cur_val>9) then begin print_err("Invalid KANSUJI number ("); print_int(cur_val); print_char(")"); help1("I'm skipping this control sequences.");@/ error; return; end else - begin cur_val:=fromDVI(kansuji_char(cur_val)); cur_val_level:=int_val; end + cur_val:=fromDVI(kansuji_char(cur_val)); end @ |print_kansuji| procedure converts a number to KANJI number. |