summaryrefslogtreecommitdiff
path: root/tex/context/base/supp-box.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/supp-box.lua')
-rw-r--r--tex/context/base/supp-box.lua12
1 files changed, 7 insertions, 5 deletions
diff --git a/tex/context/base/supp-box.lua b/tex/context/base/supp-box.lua
index 853de4cbe..c7382834a 100644
--- a/tex/context/base/supp-box.lua
+++ b/tex/context/base/supp-box.lua
@@ -10,6 +10,9 @@ if not modules then modules = { } end modules ['supp-box'] = {
local report_hyphenation = logs.reporter("languages","hyphenation")
+local tex, node = tex, node
+local context, commands, nodes = context, commands, nodes
+
local nodecodes = nodes.nodecodes
local disc_code = nodecodes.disc
@@ -19,6 +22,7 @@ local glue_code = nodecodes.glue
local glyph_code = nodecodes.glyph
local new_penalty = nodes.pool.penalty
+
local free_node = node.free
local copynodelist = node.copy_list
local copynode = node.copy
@@ -65,10 +69,9 @@ local function applytochars(list,what,nested)
while current do
local id = current.id
if nested and (id == hlist_code or id == vlist_code) then
- context.hbox()
- context.bgroup()
+ context.beginhbox()
applytochars(current.list,what,nested)
- context.egroup()
+ context.endhbox()
elseif id ~= glyph_code then
noaction(copynode(current))
else
@@ -92,8 +95,7 @@ local function applytowords(list,what,nested)
end
noaction(copynode(current))
elseif nested and (id == hlist_code or id == vlist_code) then
- context.hbox()
- context.bgroup()
+ context.beginhbox()
applytowords(current.list,what,nested)
context.egroup()
elseif not start then