summaryrefslogtreecommitdiff
path: root/tex/context/base/node-nut.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/node-nut.lua')
-rw-r--r--tex/context/base/node-nut.lua16
1 files changed, 13 insertions, 3 deletions
diff --git a/tex/context/base/node-nut.lua b/tex/context/base/node-nut.lua
index 2edc57c1a..d82a21443 100644
--- a/tex/context/base/node-nut.lua
+++ b/tex/context/base/node-nut.lua
@@ -258,6 +258,16 @@ if not direct.mlist_to_hlist then
end
+if not direct.setlist then
+
+ local setfield = nuts.setfield
+
+ function direct.setlist (n,l) setfield(n,"list",l) end
+ function direct.setleader (n,l) setfield(n,"leader",l) end
+ function direct.setsubtype(n,s) setfield(n,"subtype",s) end
+
+end
+
nuts.getdisc = direct.getdisc
nuts.setdisc = direct.setdisc
nuts.setchar = direct.setchar
@@ -266,9 +276,9 @@ nuts.setprev = direct.setprev
nuts.setboth = direct.setboth
nuts.getboth = direct.getboth
nuts.setlink = direct.setlink
-nuts.setlist = direct.setlist or function(n,l) setfield(n,"list",l) end
-nuts.setleader = direct.setleader or function(n,l) setfield(n,"leader",l) end
-nuts.setsubtype = direct.setsubtype or function(n,s) setfield(n,"subtype",s) end
+nuts.setlist = direct.setlist
+nuts.setleader = direct.setleader
+nuts.setsubtype = direct.setsubtype
nuts.is_char = direct.is_char
local d_remove_node = direct.remove