2018-09-01 23:20:00

1 files changed, 2 insertions, 19 deletions

diff --git a/tex/context/base/mkiv/back-exp.lua b/tex/context/base/mkiv/back-exp.lua
index 6d403fe53..39f6e5155 100644
--- a/tex/context/base/mkiv/back-exp.lua
+++ b/tex/context/base/mkiv/back-exp.lua
@@ -3300,10 +3300,9 @@ end
         return p
     end
 
-    function builders.paragraphs.tag(head) -- traverse_list
+    function builders.paragraphs.tag(head)
         noftextblocks = noftextblocks + 1
-        for n in nexthlist, head do
-            local subtype = getsubtype(n)
+        for n, subtype in nexthlist, head do
             if subtype == line_code then
                 setattr(n,a_textblock,noftextblocks)
             elseif subtype == glue_code or subtype == kern_code then -- no need to set fontkerns
@@ -3313,22 +3312,6 @@ end
         return false
     end
 
-    if LUATEXVERSION >= 1.080 then
-
-        function builders.paragraphs.tag(head) -- traverse_list
-            noftextblocks = noftextblocks + 1
-            for n, subtype in nexthlist, head do
-                if subtype == line_code then
-                    setattr(n,a_textblock,noftextblocks)
-                elseif subtype == glue_code or subtype == kern_code then -- no need to set fontkerns
-                    setattr(n,a_textblock,0)
-                end
-            end
-            return false
-        end
-
-    end
-
 end
 
 do