diff options
author | Karl Berry <karl@freefriends.org> | 2021-03-19 21:28:53 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-03-19 21:28:53 +0000 |
commit | b1f9b2f01e127496176dbdce9f901ebd335b7ab8 (patch) | |
tree | 173ac72662f32aa3809e502a8775520671455aeb /Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty | |
parent | ad6aef2d80fb956bee8df8dc13c8a3814dd0b2c5 (diff) |
luatexja (19mar21)
git-svn-id: svn://tug.org/texlive/trunk@58542 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty')
-rw-r--r-- | Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty | 39 |
1 files changed, 29 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty b/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty index a9ca6a2c140..d1a21a0e5c0 100644 --- a/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty +++ b/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-atbegshi.sty @@ -3,7 +3,7 @@ % \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{lltjp-atbegshi}[2020-09-30 Patching \string\shipout\space hooks for LuaTeX-ja] +\ProvidesPackage{lltjp-atbegshi}[2021-03-14 Patching \string\shipout\space hooks for LuaTeX-ja] % concept: execute all hooks inside yoko direction \vbox @@ -13,22 +13,24 @@ \RequirePackage{expl3} \ExplSyntaxOn\makeatletter \box_new:N \l__platex_shipout_dummy_box -\cs_new_eq:NN \__platex_original_shipout_execute_cont: \__shipout_execute_cont: -\cs_set:Npn \__shipout_execute_cont: -{ - % if \l_shipout_box is not a \yoko-box (= horizontal writing), +\if_cs_exist:N \__shipout_execute_main_cont:Nnnn %% 2021-05-01 +\cs_new_eq:NN \__platex_original_shipout_execute_main_cont:Nnnn + \__shipout_execute_main_cont:Nnnn +\cs_set:Npn \__shipout_execute_main_cont:Nnnn #1#2#3#4 { + % if the box #1 is not a \yoko-box (= horizontal writing), % then make it a \yoko-box behorehand. - \platex_if_box_yoko:NF \l_shipout_box { - \vbox_set:Nn \l_shipout_box { \platex_direction_yoko: \box_use:N \l_shipout_box } + \platex_if_box_yoko:NF #1 { + \vbox_set:Nn #1 { \platex_direction_yoko: \box_use:N #1 } } % if the current direction is not \yoko, - % then enclose \__shipout_execute_cont: with + % then enclose \__shipout_execute_main_cont:Nnnn with % a dummy \yoko-box named \l__platex_shipout_dummy_box. \platex_if_direction_yoko:TF { - \__platex_original_shipout_execute_cont: + \__platex_original_shipout_execute_main_cont:Nnnn { #1 } { #2 } { #3 } { #4 } }{ \vbox_set:Nn \l__platex_shipout_dummy_box { - \platex_direction_yoko: \__platex_original_shipout_execute_cont: + \platex_direction_yoko: + \__platex_original_shipout_execute_main_cont:Nnnn { #1 } { #2 } { #3 } { #4 } } % [Limitation] the code above may discard some contents, % so we'd like to put it back by \box\l__platex_shipout_dummy_box. @@ -37,6 +39,23 @@ %\box_use:N \l__platex_shipout_dummy_box } } + +\else: %% 2020-10-01 +\cs_new_eq:NN \__platex_original_shipout_execute_cont: \__shipout_execute_cont: +\cs_set:Npn \__shipout_execute_cont: +{ + \platex_if_box_yoko:NF \l_shipout_box { + \vbox_set:Nn \l_shipout_box { \platex_direction_yoko: \box_use:N \l_shipout_box } + } + \platex_if_direction_yoko:TF { + \__platex_original_shipout_execute_cont: + }{ + \vbox_set:Nn \l__platex_shipout_dummy_box { + \platex_direction_yoko: \__platex_original_shipout_execute_cont: + } + } +} +\fi: %</ltshipout>----------------------------------- \ExplSyntaxOff \expandafter\endinput |