%
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{lltjp-atbegshi}[2020-09-27 Patching \string\shipout\space hooks for LuaTeX-ja]
+\ProvidesPackage{lltjp-atbegshi}[2020-09-30 Patching \string\shipout\space hooks for LuaTeX-ja]
% concept: execute all hooks inside yoko direction \vbox
{
% if \l_shipout_box is not a \yoko-box (= horizontal writing),
% then make it a \yoko-box behorehand.
- \unless\ifnum\ltjgetparameter{boxdir}{\l_shipout_box}=4
- \vbox_set:Nn \l_shipout_box { \yoko \box_use:N \l_shipout_box }
- \fi
+ \platex_if_box_yoko:NF \l_shipout_box {
+ \vbox_set:Nn \l_shipout_box { \platex_direction_yoko: \box_use:N \l_shipout_box }
+ }
% if the current direction is not \yoko,
% then enclose \__shipout_execute_cont: with
% a dummy \yoko-box named \l__platex_shipout_dummy_box.
- \ifnum\ltjgetparameter{direction}=4
+ \platex_if_direction_yoko:TF {
\__platex_original_shipout_execute_cont:
- \else
+ }{
\vbox_set:Nn \l__platex_shipout_dummy_box {
- \yoko \__platex_original_shipout_execute_cont:
+ \platex_direction_yoko: \__platex_original_shipout_execute_cont:
}
% [Limitation] the code above may discard some contents,
% so we'd like to put it back by \box\l__platex_shipout_dummy_box.
% however, an infinite loop occurs if we uncomment the line below
% so we can't.
%\box_use:N \l__platex_shipout_dummy_box
- \fi
+ }
}
%</ltshipout>-----------------------------------
-
+\ExplSyntaxOff
\expandafter\endinput
\fi
\RequirePackage{atbegshi}