diff options
author | Hans Hagen <pragma@wxs.nl> | 2017-04-27 01:41:25 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2017-04-27 01:41:25 +0200 |
commit | 762562da00d0ec1d50e6d3c2a701156ab42e6d71 (patch) | |
tree | 2dc664caa951963a393b0a2a9c9c85d1db6b8e10 /tex/context/base/mkiv/font-otj.lua | |
parent | f2a20e191bf71094aa21d37dee2ecd2f804dbc56 (diff) | |
download | context-762562da00d0ec1d50e6d3c2a701156ab42e6d71.tar.gz |
2017-04-27 01:06:00
Diffstat (limited to 'tex/context/base/mkiv/font-otj.lua')
-rw-r--r-- | tex/context/base/mkiv/font-otj.lua | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tex/context/base/mkiv/font-otj.lua b/tex/context/base/mkiv/font-otj.lua index 50330cb83..fb526ecbb 100644 --- a/tex/context/base/mkiv/font-otj.lua +++ b/tex/context/base/mkiv/font-otj.lua @@ -575,7 +575,7 @@ local function inject_kerns_only(head,where) -- left|glyph|right local leftkern = i.leftkern if leftkern and leftkern ~= 0 then - insert_node_before(head,current,newkern(leftkern)) + head = insert_node_before(head,current,newkern(leftkern)) end end if prevdisc then @@ -1007,7 +1007,7 @@ local function inject_everything(head,where) ox = px - pn.markx end else - ox = px - pn.markx + ox = px - pn.markx - rightkern -- seguiemj needs the rightkern end end else @@ -1032,6 +1032,7 @@ local function inject_everything(head,where) -- -- we're too late anyway as kerns are already injected so -- -- we do it the ugly way (no checking if the previous is -- -- already a kern) .. maybe we should fix the font instead + -- hm, no head ? insert_node_before(n,n,newkern(-wn)) insert_node_after(n,n,newkern(-wn)) end @@ -1116,7 +1117,7 @@ local function inject_everything(head,where) -- left|glyph|right local leftkern = i.leftkern if leftkern and leftkern ~= 0 then - insert_node_before(head,current,newkern(leftkern)) + head = insert_node_before(head,current,newkern(leftkern)) end local rightkern = i.rightkern if rightkern and rightkern ~= 0 then |