diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2015-11-19 20:15:06 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2015-11-19 20:15:06 +0100 |
commit | adc43c3c243ed95215af6fe02d71e393c178da23 (patch) | |
tree | aad04954cbfb0378c65fd2b98e7c924245aad372 /tex/context/base/node-acc.lua | |
parent | 726a663be481042003566d4614266b940b5a0c91 (diff) | |
download | context-adc43c3c243ed95215af6fe02d71e393c178da23.tar.gz |
2015-11-19 19:15:00
Diffstat (limited to 'tex/context/base/node-acc.lua')
-rw-r--r-- | tex/context/base/node-acc.lua | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tex/context/base/node-acc.lua b/tex/context/base/node-acc.lua index e684aeb7b..716b3ef4d 100644 --- a/tex/context/base/node-acc.lua +++ b/tex/context/base/node-acc.lua @@ -24,6 +24,8 @@ local getnext = nuts.getnext local setfield = nuts.setfield local setattr = nuts.setattr +local setlink = nuts.setlink +local setchar = nuts.setchar local traverse_nodes = nuts.traverse local traverse_id = nuts.traverse_id @@ -71,13 +73,11 @@ local function injectspaces(head) local s = getfield(n,"spec") s = s == 0 and new_gluespec(0) or copy_node(s) -- - setfield(g,"char",32) + setchar(g,32) setfield(n,"spec",s) -- insert_after(p,p,g) - setfield(p,"next",g) - setfield(g,"prev",p) - setfield(g,"next",n) - setfield(n,"prev",g) + setlink(p,g) + setlink(g,n) setfield(s,"width",getfield(s,"width") - getfield(g,"width")) if a then setattr(g,a_characters,a) |