summaryrefslogtreecommitdiff
path: root/tex/context/base/typo-cln.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/typo-cln.lua')
-rw-r--r--tex/context/base/typo-cln.lua6
1 files changed, 4 insertions, 2 deletions
diff --git a/tex/context/base/typo-cln.lua b/tex/context/base/typo-cln.lua
index 7228e02c5..6a62bdf9e 100644
--- a/tex/context/base/typo-cln.lua
+++ b/tex/context/base/typo-cln.lua
@@ -31,11 +31,13 @@ local texsetattribute = tex.setattribute
local nuts = nodes.nuts
local tonut = nuts.tonut
-local setfield = nuts.setfield
local getchar = nuts.getchar
local getattr = nuts.getattr
local setattr = nuts.setattr
+local setfield = nuts.setfield
+local setchar = nuts.setchar
+
local traverse_id = nuts.traverse_id
local unsetvalue = attributes.unsetvalue
@@ -67,7 +69,7 @@ function cleaners.handler(head)
if type(upper) == "table" then
-- some day, not much change that \SS ends up here
else
- setfield(n,"char",upper)
+ setchar(n,upper)
done = true
if trace_autocase then
report_autocase("")