From d91c37679b13162a4ead85abbe564090b2e1b51c Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Tue, 24 Oct 2017 11:13:27 +0200 Subject: 2017-10-24 10:36:00 --- tex/context/base/mkiv/lpdf-tag.lua | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) (limited to 'tex/context/base/mkiv/lpdf-tag.lua') diff --git a/tex/context/base/mkiv/lpdf-tag.lua b/tex/context/base/mkiv/lpdf-tag.lua index b9d3e3e64..f4ecfc8a6 100644 --- a/tex/context/base/mkiv/lpdf-tag.lua +++ b/tex/context/base/mkiv/lpdf-tag.lua @@ -149,13 +149,15 @@ local function finishstructure() pdfflushobject(structure_ref,structuretree) addtocatalog("StructTreeRoot",pdfreference(structure_ref)) -- - local markinfo = pdfdictionary { - Marked = lpdf.majorversion == 1 and pdfboolean(true) or nil, - -- UserProperties = pdfboolean(true), -- maybe some day - -- Suspects = lpdf.majorversion == 1 and pdfboolean(true) or nil, - -- AF = #embeddedfilelist > 0 and pdfreference(pdfflushobject(embeddedfilelist)) or nil, - } - addtocatalog("MarkInfo",pdfreference(pdfflushobject(markinfo))) + if lpdf.majorversion() == 1 then + local markinfo = pdfdictionary { + Marked = pdfboolean(true) or nil, + -- UserProperties = pdfboolean(true), -- maybe some day + -- Suspects = pdfboolean(true) or nil, + -- AF = #embeddedfilelist > 0 and pdfreference(pdfflushobject(embeddedfilelist)) or nil, + } + addtocatalog("MarkInfo",pdfreference(pdfflushobject(markinfo))) + end -- for fulltag, element in sortedhash(elements) do -- sorting is easier on comparing pdf pdfflushobject(element.knum,element.kids) -- cgit v1.2.3