cjk-ko (20jul21)

git-svn-id: svn://tug.org/texlive/trunk@59996 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 31 insertions, 3 deletions

diff --git a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-josa.sty b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-josa.sty
index 7623138b7f5..4157b470c30 100644
--- a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-josa.sty
+++ b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-josa.sty
@@ -17,7 +17,7 @@
 % Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
 % MA 02110-1301 USA
 
-\ProvidesPackage{cjkutf8-josa}[2021/07/17 v2.0 Automatic Josa selection for cjk-ko]
+\ProvidesPackage{cjkutf8-josa}[2021/07/20 v2.1 Automatic Josa selection for cjk-ko]
 
 \AtBeginDocument{
   \ifx\use@josa\undefined\else
@@ -54,6 +54,27 @@
   }}{}
 }
 
+% support hangul syllables (0xAC00..0xD7A3)
+\def\cjkko@josa@ea{\cjkko@josa@hangul@syllableS{"EA}}
+\def\cjkko@josa@eb{\cjkko@josa@hangul@syllableS{"EB}}
+\def\cjkko@josa@ec{\cjkko@josa@hangul@syllableS{"EC}}
+\def\cjkko@josa@ed{\cjkko@josa@hangul@syllableS{"ED}}
+\def\cjkko@josa@hangul@syllableS#1#2#3{%
+  \expandafter\cjkko@josa@hangul@syllable\expandafter{%
+    \number\numexpr (#1 - 224) * 4096 + (`#2 - 128) * 64 + (`#3 - 128) - "AC00\relax }}
+\def\cjkko@josa@hangul@syllable#1{%
+  \ifnum#1<\z@ \else \ifnum#1>11171 \else
+    \expandafter\cjkko@josa@hangul@syllable@\expandafter{%
+      \number\numexpr #1 - (((#1 + 14) / 28 - 1) * 28)\relax }% we need floor, not round
+  \fi\fi
+}
+\def\cjkko@josa@hangul@syllable@#1{%
+  \ifnum#1=\z@
+    2\else \ifnum#1=8 %
+    1\else
+    0\fi\fi
+}
+
 %%% user commands: \jong \jung \rieul
 \protected\def\jong {\let\josa@str\empty\chardef\@josa\z@ }
 \protected\def\rieul{\let\josa@str\empty\chardef\@josa\@ne}
@@ -62,6 +83,13 @@
 
 \def\makejosa#1#2{%
   \bgroup
+  \begingroup
+    \let^^ea\cjkko@josa@ea
+    \let^^eb\cjkko@josa@eb
+    \let^^ec\cjkko@josa@ec
+    \let^^ed\cjkko@josa@ed
+    \let\protect\noexpand
+    \edef\x{\endgroup \def\noexpand\josa@str{\josa@str}}\x
   \expandafter\make@josa\josa@str\@nil{#1}{#2}%
   \egroup}
 
diff --git a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-ko.sty b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-ko.sty
index 155278fd2d7..63b20d9d3c6 100644
--- a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-ko.sty
+++ b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-ko.sty
@@ -18,7 +18,7 @@
 % MA 02110-1301 USA
 
 \NeedsTeXFormat{LaTeX2e}[2021/06/01]
-\ProvidesPackage{cjkutf8-ko}[2021/07/17 v2.0 Hangul typesetting on CJKutf8]
+\ProvidesPackage{cjkutf8-ko}[2021/07/20 v2.1 Hangul typesetting on CJKutf8]
 
 \begingroup\expandafter\expandafter\expandafter\endgroup
 \expandafter\ifx\csname eTeXversion\endcsname\relax
diff --git a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-nanummjhanja.sty b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-nanummjhanja.sty
index 4eb2121f376..40fc2c15520 100644
--- a/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-nanummjhanja.sty
+++ b/Master/texmf-dist/tex/latex/cjk-ko/cjkutf8-nanummjhanja.sty
@@ -18,7 +18,7 @@
 % MA 02110-1301 USA
 
 \ProvidesPackage{cjkutf8-nanummjhanja}
-  [2021/07/17 v2.0 UHC hanja for Nanum Myeongjo]
+  [2021/07/20 v2.1 UHC hanja for Nanum Myeongjo]
 
 \def\CJKKO@mjdefault{nanummj}
 \def\CJKKO@mjhanjafamily{\def\CJK@family{uhcmj}}