diff options
author | Hans Hagen <pragma@wxs.nl> | 2010-10-10 14:25:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2010-10-10 14:25:00 +0200 |
commit | 1b2a17ebfd56124803e8d0168c2755cb073ff425 (patch) | |
tree | 5cb2721788834bf63282ed75762fcae17e5719ea /tex/context/base/node-inj.lua | |
parent | e34ee22d154fbde65af2d2c6283e0049b41dee8b (diff) | |
download | context-1b2a17ebfd56124803e8d0168c2755cb073ff425.tar.gz |
beta 2010.10.10 14:25
Diffstat (limited to 'tex/context/base/node-inj.lua')
-rw-r--r-- | tex/context/base/node-inj.lua | 18 |
1 files changed, 12 insertions, 6 deletions
diff --git a/tex/context/base/node-inj.lua b/tex/context/base/node-inj.lua index 55fab6e75..f576c7ee2 100644 --- a/tex/context/base/node-inj.lua +++ b/tex/context/base/node-inj.lua @@ -121,7 +121,7 @@ function injections.setmark(start,base,factor,rlmode,ba,ma,index) --ba=baseancho set_attribute(base,markbase,bound) set_attribute(start,markmark,bound) set_attribute(start,markdone,index) - marks[bound] = { [index] = { dx, dy } } + marks[bound] = { [index] = { dx, dy, rlmode } } return dx, dy, bound end @@ -318,17 +318,23 @@ function injections.handler(head,where,keep) local index = has_attribute(n,markdone) or 1 local d = mrks[index] if d then - -- local rlmode = d[3] -- not used - -- if rlmode and rlmode > 0 then - -- todo - -- else + local rlmode = d[3] + if rlmode and rlmode > 0 then + -- new per 2010-10-06 + local k = wx[p] + if k then -- maybe (d[1] - p.width) and/or + k[2] + n.xoffset = p.xoffset - (p.width - d[1]) - k[2] + else + n.xoffset = p.xoffset - (p.width - d[1]) + end + else local k = wx[p] if k then n.xoffset = p.xoffset - d[1] - k[2] else n.xoffset = p.xoffset - d[1] end - -- end + end if mk[p] then n.yoffset = p.yoffset + d[2] else |