summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/anch-pgr.lua
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2021-02-17 14:13:46 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2021-02-17 14:13:46 +0100
commit84aae20fa32c9a50ae1c63576573f52d010de43b (patch)
treefeba3dca4dad274e8fcf58905ec552ca39ae1897 /tex/context/base/mkiv/anch-pgr.lua
parentcf803ad70f7a6ad2e7779875fcc02dd711706fc6 (diff)
downloadcontext-84aae20fa32c9a50ae1c63576573f52d010de43b.tar.gz
2021-02-17 13:33:00
Diffstat (limited to 'tex/context/base/mkiv/anch-pgr.lua')
-rw-r--r--tex/context/base/mkiv/anch-pgr.lua7
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