diff options
Diffstat (limited to 'tex/context/base/mkiv/anch-pgr.lua')
| -rw-r--r-- | tex/context/base/mkiv/anch-pgr.lua | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tex/context/base/mkiv/anch-pgr.lua b/tex/context/base/mkiv/anch-pgr.lua index 239b33010..8e400cd12 100644 --- a/tex/context/base/mkiv/anch-pgr.lua +++ b/tex/context/base/mkiv/anch-pgr.lua @@ -1210,7 +1210,7 @@ posregions[%s] := (%p,%p)--(%p,%p)--(%p,%p)--(%p,%p)--cycle ; implement { name = "fetchposboxes", arguments = { "string", "string", "integer" }, - actions = function(tags,anchor,page) -- no caching (yet) / todo: anchor, page + actions = function(tags,anchor,page) -- no caching (yet) / page local collected = jobpositions.collected if type(tags) == "string" then tags = utilities.parsers.settings_to_array(tags) @@ -1222,6 +1222,9 @@ implement { local c = collected[tag] if c then local r = c.r + if anchor ~= r then + r = anchor + end if r then r = collected[r] if r then @@ -1231,7 +1234,7 @@ implement { local rh = r.h local rd = r.d local cx = c.x - rx - local cy = c.y + local cy = c.y - ry local cw = cx + c.w local ch = cy + c.h local cd = cy - c.d |