From 2f8058544f8a3fead8186bdcb3835f1f67416cc3 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 28 Dec 2018 11:57:23 +0100
Subject: 2018-12-28 11:09:00

---
 tex/context/base/mkiv/page-lin.lua | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

(limited to 'tex/context/base/mkiv/page-lin.lua')

diff --git a/tex/context/base/mkiv/page-lin.lua b/tex/context/base/mkiv/page-lin.lua
index 51bfb4a7e..b556ca32b 100644
--- a/tex/context/base/mkiv/page-lin.lua
+++ b/tex/context/base/mkiv/page-lin.lua
@@ -43,15 +43,14 @@ local v_no               = variables.no
 local properties         = nodes.properties
 
 local nodecodes          = nodes.nodecodes
-local skipcodes          = nodes.skipcodes
-local whatcodes          = nodes.whatcodes
 local listcodes          = nodes.listcodes
 
 local hlist_code         = nodecodes.hlist
 local vlist_code         = nodecodes.vlist
 local whatsit_code       = nodecodes.whatsit
 local glyph_code         = nodecodes.glyph
-local line_code          = listcodes.line
+
+local linelist_code      = listcodes.line
 
 local a_displaymath      = attributes.private('displaymath')
 local a_linenumber       = attributes.private('linenumber')
@@ -71,7 +70,7 @@ local getattr            = nuts.getattr
 local setattr            = nuts.setattr
 local getlist            = nuts.getlist
 local getbox             = nuts.getbox
------ getdir             = nuts.getdir
+----- getdirection       = nuts.getdirection
 ----- getwidth           = nuts.getwidth
 local getheight          = nuts.getheight
 local getdepth           = nuts.getdepth
@@ -285,7 +284,7 @@ end
 local function listisnumbered(list)
     if list then
         for n, subtype in nexthlist, list do
-            if subtype == line_code then
+            if subtype == linelist_code then
                 local a = getattr(n,a_linenumber)
                 if a then
                     -- a quick test for lines (only valid when \par before \stoplinenumbering)
@@ -307,7 +306,7 @@ local function findnumberedlist(list)
     while n do
         local id = getid(n)
         if id == hlist_code then
-            if getsubtype(n) == line_code then
+            if getsubtype(n) == linelist_code then
                 local a = getattr(n,a_linenumber)
                 if a then
                     return a > 0 and list
@@ -385,7 +384,7 @@ function boxed.stage_one(n,nested)
 
     local function check()
         for n, subtype in nexthlist, list do
-            if subtype ~= line_code then
+            if subtype ~= linelist_code then
                 -- go on
             elseif getheight(n) == 0 and getdepth(n) == 0 then
                 -- skip funny hlists -- todo: check line subtype
@@ -481,9 +480,9 @@ function boxed.stage_two(n,m)
             local li = current_list[i]
             local n, m, ti = li[1], li[2], t[i]
             if ti then
-             -- local d = getdir(n)
+             -- local d = getdirection(n)
              -- local l = getlist(n)
-             -- if d == "TRT" then
+             -- if d == 1 then
              --     local w = getwidth(n)
              --     ti = hpack_nodes(linked_nodes(new_kern(-w),ti,new_kern(w)))
              -- end
-- 
cgit v1.2.3