diff options
Diffstat (limited to 'Build/source/texk/web2c/ptexdir/kanji.c')
-rw-r--r-- | Build/source/texk/web2c/ptexdir/kanji.c | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/ptexdir/kanji.c b/Build/source/texk/web2c/ptexdir/kanji.c index 4fd39d2f293..a3f56607612 100644 --- a/Build/source/texk/web2c/ptexdir/kanji.c +++ b/Build/source/texk/web2c/ptexdir/kanji.c @@ -72,18 +72,23 @@ integer kcatcodekey(integer c) return Hi(toDVI(c)); } -void init_default_kanji (const_string file_str, const_string internal_str) +void init_kanji (const_string file_str, const_string internal_str) { - char *p; - - enable_UPTEX (false); /* disable */ - if (!set_enc_string (file_str, internal_str)) { fprintf (stderr, "Bad kanji encoding \"%s\" or \"%s\".\n", file_str ? file_str : "NULL", internal_str ? internal_str : "NULL"); uexit(1); } +} + +void init_default_kanji (const_string file_str, const_string internal_str) +{ + char *p; + + enable_UPTEX (false); /* disable */ + + init_kanji (file_str, internal_str); p = getenv ("PTEX_KANJI_ENC"); if (p) { |