diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-03-04 00:15:09 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-03-04 00:15:09 +0100 |
commit | 60687b77ba7082f7c554c4163c5cc31df97ea243 (patch) | |
tree | cdd467755084b1d99551f67ec1cb2f8e975be654 /tex/context/base/mkiv/strc-reg.lua | |
parent | 62676780b4363d25d7a247f39484b1e4a34ef7b7 (diff) | |
download | context-60687b77ba7082f7c554c4163c5cc31df97ea243.tar.gz |
2016-03-03 23:33:00
Diffstat (limited to 'tex/context/base/mkiv/strc-reg.lua')
-rw-r--r-- | tex/context/base/mkiv/strc-reg.lua | 23 |
1 files changed, 15 insertions, 8 deletions
diff --git a/tex/context/base/mkiv/strc-reg.lua b/tex/context/base/mkiv/strc-reg.lua index ed3292195..4efbe038b 100644 --- a/tex/context/base/mkiv/strc-reg.lua +++ b/tex/context/base/mkiv/strc-reg.lua @@ -391,13 +391,18 @@ end local function finalizer() local flaginternals = references.flaginternals + local usedviews = references.usedviews for k, v in next, tobesaved do local entries = v.entries if entries then for i=1,#entries do local r = entries[i].references - if r and flaginternals[r.internal] then - r.used = true + if r then + local i = r.internal + local f = flaginternals[i] + if f then + r.used = usedviews[i] or true + end end end end @@ -539,7 +544,7 @@ local function storeregister(rawdata) -- metadata, references, entries end -- if notsaved then - usedinternals[internal] = true -- todo view (we assume that forward references index entries are used) + usedinternals[internal] = references.used -- todo view (we assume that forward references index entries are used) end -- if not references.realpage then @@ -641,11 +646,12 @@ implement { implement { name = "storeregister", - actions = function(rawdata) - local nofentries = storeregister(rawdata) - setinternalreference { internal = rawdata.references.internal } - context(nofentries) - end, + -- actions = function(rawdata) + -- local nofentries = storeregister(rawdata) + -- setinternalreference { internal = rawdata.references.internal } + -- context(nofentries) + -- end, + actions = { storeregister, context }, arguments = { { { "metadata", { @@ -669,6 +675,7 @@ implement { { "references", { { "internal", "integer" }, { "section", "integer" }, + { "view" }, { "label" } } }, |