| リビジョン | 1a7298447f6ef6ef7c2c619a9bf9046d4357d192 (tree) |
|---|---|
| 日時 | 2021-04-20 22:35:33 |
| 作者 | Hironori Kitagawa <h_kitagawa2001@yaho...> |
| コミッター | Hironori Kitagawa |
fix #42039
src/lltjext.sty (diff)| @@ -3,7 +3,7 @@ | ||
| 3 | 3 | % |
| 4 | 4 | |
| 5 | 5 | \NeedsTeXFormat{LaTeX2e} |
| 6 | -\ProvidesPackage{lltjext}[2020-09-30 v1.2k-ltj-12 Macros for vertical writing] | |
| 6 | +\ProvidesPackage{lltjext}[2021-04-20 v1.2k-ltj-13 Macros for vertical writing] | |
| 7 | 7 | \RequirePackage{luatexja} |
| 8 | 8 | \newcount\ltj@ext@dir |
| 9 | 9 | \let\ltj@lltjext@orig@tabular=\tabular |
| @@ -28,7 +28,7 @@ | ||
| 28 | 28 | \setlength\dimen@{#2}% |
| 29 | 29 | \edef\@halignto{to\the\dimen@}\p@tabular<#1>} |
| 30 | 30 | \def\p@tabular<#1>{\leavevmode \hbox \bgroup |
| 31 | - \ltj@ext@dir=\ltjgetparameter{direction} | |
| 31 | + \ltj@ext@dir=\ltjgetparameter{direction}\relax | |
| 32 | 32 | $\let\@acol\@tabacol |
| 33 | 33 | \let\@classz\@tabclassz |
| 34 | 34 | \let\@classiv\@tabclassiv \let\\\@tabularcr\p@tabarray<#1>} |
| @@ -36,6 +36,7 @@ | ||
| 36 | 36 | {\p@array<#1>}{\p@array<#1>[c]}} |
| 37 | 37 | |
| 38 | 38 | \def\p@array<#1>[#2]#3{% |
| 39 | + \ifnum\ltj@ext@dir=0 \ltj@ext@dir=\ltjgetparameter{direction}\relax\fi | |
| 39 | 40 | \let\box@dir\relax |
| 40 | 41 | \if #1z\relax |
| 41 | 42 | \ifnum\ltj@ext@dir=3\relax |
| @@ -674,7 +675,7 @@ | ||
| 674 | 675 | |
| 675 | 676 | \def\ltj@lltjext@patch@array{% |
| 676 | 677 | \patchcmd{\@tabular}{\hbox\bgroup}{% |
| 677 | - \hbox\bgroup\ltj@ext@dir=\ltjgetparameter{direction}}{}{} | |
| 678 | + \hbox\bgroup\ltj@ext@dir=\ltjgetparameter{direction}\relax}{}{} | |
| 678 | 679 | \pretocmd{\array}% |
| 679 | 680 | {\ltj@ext@dir=\ltjgetparameter{direction}\relax}{}{} |
| 680 | 681 | \expandafter\let\csname tabular*\endcsname=\ltj@lltjext@orig@tabularS |
| @@ -702,6 +703,7 @@ | ||
| 702 | 703 | }% |
| 703 | 704 | \def\@tabarray{\@ifnextchar<\p@tabarray{\p@tabarray<Z>}} |
| 704 | 705 | \def\p@array<##1>[##2]##3{% |
| 706 | + \ifnum\ltj@ext@dir=0 \ltj@ext@dir=\ltjgetparameter{direction}\relax\fi | |
| 705 | 707 | \let\box@dir\relax |
| 706 | 708 | \if ##1z\relax |
| 707 | 709 | \ifnum\ltj@ext@dir=3\relax |
| @@ -734,7 +736,7 @@ | ||
| 734 | 736 | \fork@array@option<##1>[##2]% |
| 735 | 737 | \begingroup |
| 736 | 738 | \@mkpream{##3}% |
| 737 | - \xdef\@preamble{\ialign \noexpand \@halignto | |
| 739 | + \xdef\@preamble{\noexpand\ialign \noexpand \@halignto | |
| 738 | 740 | \bgroup \tabskip \z@skip \@arstrut \@preamble |
| 739 | 741 | \tabskip \z@ \cr}% |
| 740 | 742 | \endgroup |
Fork