luatexko (21apr18)

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

7 files changed, 24 insertions, 16 deletions

diff --git a/Master/texmf-dist/doc/luatex/luatexko/ChangeLog b/Master/texmf-dist/doc/luatex/luatexko/ChangeLog
index 5e7bbab1dd1..ca8f9892cdd 100644
--- a/Master/texmf-dist/doc/luatex/luatexko/ChangeLog
+++ b/Master/texmf-dist/doc/luatex/luatexko/ChangeLog
@@ -1,3 +1,10 @@
+2018-04-19      Dohyun Kim <nomos at ktug org>
+
+	Version 1.20
+
+	* luatexko.lua: node.tail -> node.slide: see the bug reported at
+	http://www.ktug.org/xe/index.php?document_srl=229431
+
 2018-04-06      Dohyun Kim <nomos at ktug org>
 
 	Version 1.19
diff --git a/Master/texmf-dist/doc/luatex/luatexko/README b/Master/texmf-dist/doc/luatex/luatexko/README
index 44786d3629d..0e43b9d2740 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.19 (2018/04/06)
+LuaTeX-ko Package version 1.20 (2018/04/19)
 ===========================================
 
 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 96c27b3a7de..940fa3990b6 100644
--- a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf
+++ b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.pdf
diff --git a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex
index c4196e06ca1..03a27b6f076 100644
--- a/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex
+++ b/Master/texmf-dist/doc/luatex/luatexko/luatexko-doc.tex
@@ -61,8 +61,8 @@
 \title{\luatexko\ 간단 매뉴얼}
 \author{Dohyun Kim \normalsize |<nomos at ktug org>| \and
         Soojin Nam \normalsize |<jsunam at gmail com>| \and
-  \normalsize \url{<http://github.com/dohyunkim/luatexko>}}
-\date{Version 1.19\quad 2018/04/06}
+  \normalsize <\url{http://github.com/dohyunkim/luatexko}>}
+\date{Version 1.20\quad 2018/04/19}
 \maketitle
 
 \begin{quote}\small
diff --git a/Master/texmf-dist/tex/luatex/luatexko/luatexko-core.sty b/Master/texmf-dist/tex/luatex/luatexko/luatexko-core.sty
index 7d21ec88e3f..b91570c9b80 100644
--- a/Master/texmf-dist/tex/luatex/luatexko/luatexko-core.sty
+++ b/Master/texmf-dist/tex/luatex/luatexko/luatexko-core.sty
@@ -17,7 +17,7 @@
   \ifcsname ifpdf\endcsname\else \input ifpdf.sty \fi
   \catcode`@ = 11
 \else
-  \ProvidesPackage{luatexko-core}[2018/04/06 v1.19 Typesetting Korean with LuaTeX]
+  \ProvidesPackage{luatexko-core}[2018/04/19 v1.20 Typesetting Korean with LuaTeX]
   \RequirePackage{luaotfload}[2016/04/21]
   \RequirePackage{ifpdf}
 \fi
diff --git a/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua b/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua
index 915da8cd9c5..c31745cf2bc 100644
--- a/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua
+++ b/Master/texmf-dist/tex/luatex/luatexko/luatexko.lua
@@ -13,8 +13,8 @@
 
 luatexbase.provides_module {
   name        = 'luatexko',
-  date        = '2018/04/06',
-  version     = '1.19',
+  date        = '2018/04/19',
+  version     = '1.20',
   description = 'Korean linebreaking and font-switching',
   author      = 'Dohyun Kim, Soojin Nam',
   license     = 'LPPL v1.3+',
@@ -119,10 +119,11 @@ local d_remove_node     = nodedirect.remove
 local d_nodenew         = nodedirect.new
 local d_nodecount       = nodedirect.count
 local d_end_of_math     = nodedirect.end_of_math
-local d_nodetail        = nodedirect.tail
+local d_nodetail        = nodedirect.slide -- tail seems to be no good
 local d_nodedimensions  = nodedirect.dimensions
 local d_nodefree        = nodedirect.free
 local d_nodewrite       = nodedirect.write
+local d_node_zero_glue  = nodedirect.is_zero_glue
 
 local emsize = 655360
 
@@ -613,28 +614,28 @@ local function d_get_hlist_char_first (hlist)
       local c,f = d_get_hlist_char_first(curr)
       if c then return c,f end
     elseif currid == gluenode then
-      if d_getglue(curr) ~= 0 then return end
+      if not d_node_zero_glue(curr) then return end
     end
     curr = d_getnext(curr)
   end
 end
 
-local function d_get_hlist_char_last (hlist,prevchar,prevfont)
+local function d_get_hlist_char_last (hlist,c,f)
   local curr = d_nodetail(d_getlist(hlist))
   while curr do
     local currid = d_getid(curr)
     if currid == glyphnode then
-      local c,f = d_get_unicode_char(curr), d_getfont(curr)
-      if c and not is_unicode_vs(c) then return c,f end -- bypass VS
+      c, f = d_get_unicode_char(curr), d_getfont(curr)
+      if c and not is_unicode_vs(c) then break end -- bypass VS
     elseif currid == hlistnode or currid == vlistnode then
-      local c,f = d_get_hlist_char_last(curr)
-      if c then return c,f end
+      c, f = d_get_hlist_char_last(curr)
+      if c then break end
     elseif currid == gluenode then
-      if d_getglue(curr) ~= 0 then return end
+      if not d_node_zero_glue(curr) then break end
     end
     curr = d_getprev(curr)
   end
-  return prevchar, prevfont
+  return c, f
 end
 
 ----------------------------
diff --git a/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty b/Master/texmf-dist/tex/luatex/luatexko/luatexko.sty
index 6d054c4001e..aaa7e923ffa 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/06 v1.19 Typesetting Korean with LuaLaTeX]
+\ProvidesPackage{luatexko}[2018/04/19 v1.20 Typesetting Korean with LuaLaTeX]
 
 \ifdefined\adjustspacing\else % luatex < 0.87
   \let\adjustspacing\pdfadjustspacing