summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua')
-rw-r--r--Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua13
1 files changed, 5 insertions, 8 deletions
diff --git a/Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua b/Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua
index 4c6c3b6bd7a..47b4aec1d00 100644
--- a/Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua
+++ b/Master/texmf-dist/tex/luatex/luatexja/ltj-direction.lua
@@ -1113,21 +1113,18 @@ do
end
end
end
- local getbox, shipout = tex.getbox, tex.shipout
- local setbox, copy = node.direct.setbox, node.direct.copy
- local afbox
- function luatexja.direction.shipout()
+ local copy = node.direct.copy
+ function luatexja.direction.shipout_lthook (head)
start_time_measure 'box_primitive_hook'
- if (not afbox) and luatexja.afbox_number then afbox = luatexja.afbox_number end
- local a = to_direct(getbox 'ltj@afbox')
+ local a = to_direct(head)
local a_dir = get_box_dir(a, dir_yoko)
if a_dir~=dir_yoko then
local b = create_dir_node(a, a_dir, dir_yoko, false)
setfield(b, 'head', a); a = b
end
setfield(shipout_temp, 'head', a); finalize_inner(shipout_temp)
- setbox(afbox, copy(getlist(shipout_temp))); setfield(shipout_temp, 'head',nil)
- shipout(afbox)
+ a = copy(getlist(shipout_temp)); setfield(shipout_temp, 'head',nil)
stop_time_measure 'box_primitive_hook'
+ return to_node(a)
end
end