From 6db19b4a697cd588ece6f51438d025dd36982651 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 2 Aug 2018 20:32:09 +0000 Subject: luatexko (2aug18) git-svn-id: svn://tug.org/texlive/trunk@48334 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/luatex/luatexko/ChangeLog | 7 ++ Master/texmf-dist/doc/luatex/luatexko/README | 2 +- .../doc/luatex/luatexko/luatexko-doc.pdf | Bin 229533 -> 229318 bytes .../doc/luatex/luatexko/luatexko-doc.tex | 2 +- Master/texmf-dist/tex/luatex/luatexko/luatexko.lua | 19 +++- Master/texmf-dist/tex/luatex/luatexko/luatexko.sty | 105 ++++++++------------- 6 files changed, 62 insertions(+), 73 deletions(-) (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/doc/luatex/luatexko/ChangeLog b/Master/texmf-dist/doc/luatex/luatexko/ChangeLog index ca8f9892cdd..d897ede540a 100644 --- a/Master/texmf-dist/doc/luatex/luatexko/ChangeLog +++ b/Master/texmf-dist/doc/luatex/luatexko/ChangeLog @@ -1,3 +1,10 @@ +2018-08-02 Dohyun Kim + + Version 1.21 + + * luatexko.sty: adapt to the fontspec v2.6h + * luatexko.lua: font substitution for disc node as well + 2018-04-19 Dohyun Kim Version 1.20 diff --git a/Master/texmf-dist/doc/luatex/luatexko/README b/Master/texmf-dist/doc/luatex/luatexko/README index 0e43b9d2740..715c16f4aea 100644 --- a/Master/texmf-dist/doc/luatex/luatexko/README +++ b/Master/texmf-dist/doc/luatex/luatexko/README @@ -1,4 +1,4 @@ -LuaTeX-ko Package version 1.20 (2018/04/19) +LuaTeX-ko Package version 1.21 (2018/08/02) =========================================== This is a Lua(La)TeX macro package that supports typesetting Korean diff --git a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf index 940fa3990b6..176b3ac0295 100644 Binary files a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf and b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf differ diff --git a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex index 03a27b6f076..494e5d978fd 100644 --- a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex +++ b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex @@ -62,7 +62,7 @@ \author{Dohyun Kim \normalsize || \and Soojin Nam \normalsize || \and \normalsize <\url{http://github.com/dohyunkim/luatexko}>} -\date{Version 1.20\quad 2018/04/19} +\date{Version 1.21\quad 2018/08/02} \maketitle \begin{quote}\small diff --git a/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua b/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua index c31745cf2bc..4ad352e08af 100644 --- a/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua +++ b/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua @@ -74,6 +74,7 @@ end local glue_type_space = 13 local kern_type_itlc = 3 +local discnode = node.id("disc") local gluenode = node.id("glue") local glyphnode = node.id("glyph") local mathnode = node.id("math") @@ -87,6 +88,7 @@ local user_whatsit = node.subtype("user_defined") local n_copy_list = node.copy_list local nodedirect = node.direct +local d_getdisc = nodedirect.getdisc local d_todirect = nodedirect.todirect local d_tonode = nodedirect.tonode local d_has_field = nodedirect.has_field @@ -488,7 +490,7 @@ local function is_cjk_k (c) or (c >= 0xFE10 and c <= 0xFE1F ) or (c >= 0xFE30 and c <= 0xFE4F ) or (c >= 0xFF00 and c <= 0xFFEF ) - or (c >= 0x20000 and c <= 0x2FA1F) + or (c >= 0x20000 and c <= 0x2FFFD) or c == 0x00B0 or c == 0x2015 -- or c == 0x2018 or c == 0x2019 -- or c == 0x201C or c == 0x201D @@ -499,7 +501,7 @@ end local function is_hanja (c) return (c >= 0x3400 and c <= 0x9FFF ) or (c >= 0xF900 and c <= 0xFAFF ) - or (c >= 0x20000 and c <= 0x2FA1F) + or (c >= 0x20000 and c <= 0x2FFFD) end local function is_hangul (c) @@ -1501,9 +1503,7 @@ local function font_substitute(head) local curr = head while curr do local currid = d_getid(curr) - if currid == mathnode and d_getsubtype(curr) == 0 then - curr = d_end_of_math(curr) - elseif currid == glyphnode then + if currid == glyphnode then local currchar, currfont = d_getchar(curr), d_getfont(curr) if currchar then if is_unicode_vs(currchar) then -- ideograph variation selectors @@ -1589,6 +1589,15 @@ local function font_substitute(head) end end end + elseif currid == mathnode then + if d_getsubtype(curr) == 0 then + curr = d_end_of_math(curr) + end + elseif currid == discnode then + local pre, post, replace = d_getdisc(curr) + if pre then font_substitute(pre) end + if post then font_substitute(post) end + if replace then font_substitute(replace) end end curr = d_getnext(curr) end diff --git a/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty b/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty index aaa7e923ffa..a33d455a7a4 100644 --- a/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty +++ b/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty @@ -23,7 +23,7 @@ \expandafter\endinput \fi -\ProvidesPackage{luatexko}[2018/04/19 v1.20 Typesetting Korean with LuaLaTeX] +\ProvidesPackage{luatexko}[2018/08/02 v1.21 Typesetting Korean with LuaLaTeX] \ifdefined\adjustspacing\else % luatex < 0.87 \let\adjustspacing\pdfadjustspacing @@ -41,10 +41,7 @@ \ProcessOptions\relax \if@luatexko@loadfontspec - %% euenc redefines \f@size by \DeclareErrorFont. sigh - \let\luatexko@f@size\f@size - \RequirePackage{fontspec}[2014/05/25] - \let\f@size\luatexko@f@size + \RequirePackage{fontspec}[2018/07/30] \fi \RequirePackage{luatexko-core} @@ -89,7 +86,7 @@ %% macros for Korean fonts \DeclareDocumentCommand \setmainhangulfont { O{} m O{} } { - \newfontfamily \serifhangul@font [#1,#3] {#2} + \setfontfamily \serifhangul@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \rmdefault { \cs_set_eq:NN \hangul@font \serifhangul@font @@ -99,7 +96,7 @@ } \DeclareDocumentCommand \setmainhanjafont { O{} m O{} } { - \newfontfamily \serifhanja@font [#1,#3] {#2} + \setfontfamily \serifhanja@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \rmdefault { \cs_set_eq:NN \hanja@font \serifhanja@font @@ -109,7 +106,7 @@ } \DeclareDocumentCommand \setmainfallbackfont { O{} m O{} } { - \newfontfamily \seriffallback@font [#1,#3] {#2} + \setfontfamily \seriffallback@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \rmdefault { \cs_set_eq:NN \fallback@font \seriffallback@font @@ -119,7 +116,7 @@ } \DeclareDocumentCommand \setsanshangulfont { O{} m O{} } { - \newfontfamily \sanshangul@font [#1,#3] {#2} + \setfontfamily \sanshangul@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \sfdefault { \cs_set_eq:NN \hangul@font \sanshangul@font @@ -129,7 +126,7 @@ } \DeclareDocumentCommand \setsanshanjafont { O{} m O{} } { - \newfontfamily \sanshanja@font [#1,#3] {#2} + \setfontfamily \sanshanja@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \sfdefault { \cs_set_eq:NN \hanja@font \sanshanja@font @@ -139,7 +136,7 @@ } \DeclareDocumentCommand \setsansfallbackfont { O{} m O{} } { - \newfontfamily \sansfallback@font [#1,#3] {#2} + \setfontfamily \sansfallback@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \sfdefault { \cs_set_eq:NN \fallback@font \sansfallback@font @@ -149,7 +146,7 @@ } \DeclareDocumentCommand \setmonohangulfont { O{} m O{} } { - \newfontfamily \monohangul@font [#1,#3] {#2} + \setfontfamily \monohangul@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \ttdefault { \cs_set_eq:NN \hangul@font \monohangul@font @@ -159,7 +156,7 @@ } \DeclareDocumentCommand \setmonohanjafont { O{} m O{} } { - \newfontfamily \monohanja@font [#1,#3] {#2} + \setfontfamily \monohanja@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \ttdefault { \cs_set_eq:NN \hanja@font \monohanja@font @@ -169,7 +166,7 @@ } \DeclareDocumentCommand \setmonofallbackfont { O{} m O{} } { - \newfontfamily \monofallback@font [#1,#3] {#2} + \setfontfamily \monofallback@font [#1,#3] {#2} \str_if_eq_x:nnT \familydefault \ttdefault { \cs_set_eq:NN \fallback@font \monofallback@font @@ -179,7 +176,7 @@ } \DeclareDocumentCommand \newhangulfontfamily { m O{} m O{} } { - \exp_args:Nc \newfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} + \exp_args:Nc \setfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} \DeclareRobustCommand #1 { \cs_set_eq:Nc \hangul@font { luatexkofont@ \token_to_str:N #1 } @@ -188,7 +185,7 @@ } \DeclareDocumentCommand \newhanjafontfamily { m O{} m O{} } { - \exp_args:Nc \newfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} + \exp_args:Nc \setfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} \DeclareRobustCommand #1 { \cs_set_eq:Nc \hanja@font { luatexkofont@ \token_to_str:N #1 } @@ -197,7 +194,7 @@ } \DeclareDocumentCommand \newfallbackfontfamily { m O{} m O{} } { - \exp_args:Nc \newfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} + \exp_args:Nc \setfontfamily { luatexkofont@ \token_to_str:N #1 } [#2,#4] {#3} \DeclareRobustCommand #1 { \cs_set_eq:Nc \fallback@font { luatexkofont@ \token_to_str:N #1 } @@ -233,21 +230,21 @@ } \DeclareDocumentCommand \hangulfontspec { O{} m O{} } { - \newfontfamily \hangul@font [#1,#3] {#2} + \setfontfamily \hangul@font [#1,#3] {#2} \luatexko@hangul@selectfont \ignorespaces } \cs_set_eq:NN \adhochangulfont \hangulfontspec \DeclareDocumentCommand \hanjafontspec { O{} m O{} } { - \newfontfamily \hanja@font [#1,#3] {#2} + \setfontfamily \hanja@font [#1,#3] {#2} \luatexko@hanja@selectfont \ignorespaces } \cs_set_eq:NN \adhochanjafont \hanjafontspec \DeclareDocumentCommand \fallbackfontspec { O{} m O{} } { - \newfontfamily \fallback@font [#1,#3] {#2} + \setfontfamily \fallback@font [#1,#3] {#2} \luatexko@fallback@selectfont \ignorespaces } @@ -308,58 +305,34 @@ { \fontspec_set_family:Nnn \luatexko@math@hangul@family {#1,#3} {#2} } -% fontspec 2017 +%% fontspec 2018 \RenewDocumentCommand \setmainfont { O{} m O{} } - { - \fontspec_set_family:Nnn \g__fontspec_rmfamily_family {#1,#3} {#2} - \tl_set_eq:NN \rmdefault \g__fontspec_rmfamily_family - \use:x { \exp_not:n { \DeclareRobustCommand \rmfamily } - { - \exp_not:N \luatexko@serif@fonts - \exp_not:N \fontencoding { \l__fontspec_nfss_enc_tl } - \exp_not:N \fontfamily { \g__fontspec_rmfamily_family } - \exp_not:N \selectfont - } + { + \__fontspec_main_setmainfont:nn {#1,#3} {#2} + \protected\edef\rmfamily{ + \unexpanded{\luatexko@serif@fonts} + \unexpanded\expandafter{\rmfamily} + } + \ignorespaces } - \str_if_eq_x:nnT {\familydefault} {\rmdefault} - { \tl_set_eq:NN \encodingdefault \l__fontspec_nfss_enc_tl } - \normalfont - \ignorespaces - } \RenewDocumentCommand \setsansfont { O{} m O{} } - { - \fontspec_set_family:Nnn \g__fontspec_sffamily_family {#1,#3} {#2} - \tl_set_eq:NN \sfdefault \g__fontspec_sffamily_family - \use:x { \exp_not:n { \DeclareRobustCommand \sffamily } - { - \exp_not:N \luatexko@sans@fonts - \exp_not:N \fontencoding { \l__fontspec_nfss_enc_tl } - \exp_not:N \fontfamily { \g__fontspec_sffamily_family } - \exp_not:N \selectfont - } + { + \__fontspec_main_setsansfont:nn {#1,#3} {#2} + \protected\edef\sffamily{ + \unexpanded{\luatexko@sans@fonts} + \unexpanded\expandafter{\sffamily} + } + \ignorespaces } - \str_if_eq_x:nnT {\familydefault} {\sfdefault} - { \tl_set_eq:NN \encodingdefault \l__fontspec_nfss_enc_tl } - \normalfont - \ignorespaces - } \RenewDocumentCommand \setmonofont { O{} m O{} } - { - \fontspec_set_family:Nnn \g__fontspec_ttfamily_family {#1,#3} {#2} - \tl_set_eq:NN \ttdefault \g__fontspec_ttfamily_family - \use:x { \exp_not:n { \DeclareRobustCommand \ttfamily } - { - \exp_not:N \luatexko@mono@fonts - \exp_not:N \fontencoding { \l__fontspec_nfss_enc_tl } - \exp_not:N \fontfamily { \g__fontspec_ttfamily_family } - \exp_not:N \selectfont - } + { + \__fontspec_main_setmonofont:nn {#1,#3} {#2} + \protected\edef\ttfamily{ + \unexpanded{\luatexko@mono@fonts} + \unexpanded\expandafter{\ttfamily} + } + \ignorespaces } - \str_if_eq_x:nnT {\familydefault} {\ttdefault} - { \tl_set_eq:NN \encodingdefault \l__fontspec_nfss_enc_tl } - \normalfont - \ignorespaces - } \cs_set_eq:NN \setromanfont \setmainfont \ExplSyntaxOff \fi -- cgit v1.2.3