summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-04-02 21:04:45 +0000
committerKarl Berry <karl@freefriends.org>2019-04-02 21:04:45 +0000
commitf8ec550b6e3ef741c5fedbf0e3fc2cd192a7392b (patch)
treeb0194934447bdf4924a952a898fd5b9d22a7f09b /Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl
parentd66cfca1b1989bbf980473ff42a40a821a16d5aa (diff)
japanese-otf-uptex (2apr19)
git-svn-id: svn://tug.org/texlive/trunk@50707 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl')
-rwxr-xr-xMaster/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl b/Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl
index 09d0c095a95..4c14fd45593 100755
--- a/Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl
+++ b/Master/texmf-dist/source/fonts/japanese-otf-uptex/script/umkpkana.pl
@@ -257,8 +257,8 @@ sub write_char {
next unless ($exist_char{sprintf("%X",$ucscode)});
}
if (&is_ucs_kigo){&print_kigo_char;}
- elsif(&is_ucs_hira){&print_kana_char;}
- elsif(&is_ucs_kata){&print_kana_char;}
+ elsif(&is_ucs_hira || &is_dvicode('hira-yori')){&print_kana_char;}
+ elsif(&is_ucs_kata || &is_dvicode('kata-koto')){&print_kana_char;}
elsif(&is_ucs_hankana && $hk_mode){&print_hankana_char;}
else{&print_char;}
}