diff options
Diffstat (limited to 'tex/context/base/typo-cln.lua')
-rw-r--r-- | tex/context/base/typo-cln.lua | 17 |
1 files changed, 5 insertions, 12 deletions
diff --git a/tex/context/base/typo-cln.lua b/tex/context/base/typo-cln.lua index b7e337662..2aa05b6d1 100644 --- a/tex/context/base/typo-cln.lua +++ b/tex/context/base/typo-cln.lua @@ -28,14 +28,7 @@ local tasks = nodes.tasks 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 traverse_id = nuts.traverse_id +local traverse_id = node.traverse_id local unsetvalue = attributes.unsetvalue @@ -55,18 +48,18 @@ local resetter = { -- this will become an entry in char-def function cleaners.handler(head) local inline, done = false, false - for n in traverse_id(glyph_code,tonut(head)) do - local char = getchar(n) + for n in traverse_id(glyph_code,head) do + local char = n.char if resetter[char] then inline = false elseif not inline then - local a = getattr(n,a_cleaner) + local a = n[a_cleaner] if a == 1 then -- currently only one cleaner so no need to be fancy local upper = uccodes[char] if type(upper) == "table" then -- some day, not much change that \SS ends up here else - setfield(n,"char",upper) + n.char = upper done = true if trace_autocase then report_autocase("") |