From 4e703bdd2f304028698cd4ab92b0dda0b95a95a8 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 5 Jun 2021 03:00:55 +0000 Subject: CTAN sync 202106050300 --- language/japanese/platex/plcore.dtx | 32 +++++++++++++++++++++----------- 1 file changed, 21 insertions(+), 11 deletions(-) (limited to 'language/japanese/platex/plcore.dtx') diff --git a/language/japanese/platex/plcore.dtx b/language/japanese/platex/plcore.dtx index 6e61ab38c9..118a6ad96f 100644 --- a/language/japanese/platex/plcore.dtx +++ b/language/japanese/platex/plcore.dtx @@ -126,7 +126,7 @@ % \changes{v1.3e}{2020/03/05}{合字処理を抑止しつつ\cs{xkanjiskip}は挿入} % \changes{v1.3f}{2020/09/26}{\cs{AtBeginDvi}を再定義しない % (checked ltshipout.dtx 2020/09/21 v1.0c)} -% \changes{v1.3f}{2020/09/26}{\cs{\_\_shipout_execute_cont:}を再定義 +% \changes{v1.3f}{2020/09/26}{\cs{\_\_shipout\_execute\_cont:}を再定義 % (checked ltshipout.dtx 2020/09/21 v1.0c)} % \changes{v1.3g}{2020/09/28}{縦組で空のフロートだけのページの % フッタ(Issue 78)} @@ -134,13 +134,14 @@ % \changes{v1.3h}{2021/03/14}{\LaTeXe~2021-06-01に伴う修正} % \changes{v1.3i}{2021/03/25}{\cs{@outputpage}, \cs{@vtryfc}での、非横組時における % \cs{@outputbox}の寸法補正のコードを別命令として切り出した} +% \changes{v1.3j}{2021/06/03}{巻戻しコードのエラー修正} % \fi % % \iffalse %<*driver> \NeedsTeXFormat{pLaTeX2e} % \fi -\ProvidesFile{plcore.dtx}[2021/03/25 v1.3i pLaTeX core file] +\ProvidesFile{plcore.dtx}[2021/06/03 v1.3j pLaTeX core file] % \iffalse \documentclass{jltxdoc} \GetFileInfo{plcore.dtx} @@ -1641,9 +1642,10 @@ % ^^A 本当は、処理終了時に|\box\l__platex_shipout_dummy_box|して % ^^A メイン垂直リストに中身を戻したいのですが、 % ^^A なぜか無限ループが起きるため実行していません。 -% \changes{v1.3f}{2020/09/26}{\cs{shipout-execute-cont}を再定義 +% \changes{v1.3f}{2020/09/26}{\cs{\_\_shipout\_execute\_cont:}を再定義 % (checked ltshipout.dtx 2020/09/21 v1.0c)} % \changes{v1.3g}{2020/09/28}{\file{plexpl3}で定義した命令を使用} +% \changes{v1.3j}{2021/06/03}{巻戻しコードのエラー修正} % \begin{macrocode} % %\plIncludeInRelease{2020/10/01}{\__shipout_execute_cont:} @@ -1651,9 +1653,14 @@ %<*plcore|platexrelease> \ifdefined\ExplSyntaxOn %--- expl3 available BEGIN \ExplSyntaxOn -\if_cs_exist:N \__shipout_execute_cont: -\cs_new_eq:NN \__platex_original_shipout_execute_cont: \__shipout_execute_cont: -\box_new:N \l__platex_shipout_dummy_box +\cs_if_exist:NT \__shipout_execute_cont: { %--- IF LEVEL 1 BEGIN +\cs_if_exist:NF \__platex_original_shipout_execute_cont: { + \cs_new_eq:NN \__platex_original_shipout_execute_cont: + \__shipout_execute_cont: + } +\cs_if_exist:NF \l__platex_shipout_dummy_box { + \box_new:N \l__platex_shipout_dummy_box + } \cs_set:Npn \__shipout_execute_cont: { % if \l_shipout_box is not a \yoko-box (= horizontal writing), @@ -1683,7 +1690,7 @@ %\box_use:N \l__platex_shipout_dummy_box } } -\fi: +} %--- IF LEVEL 1 END % \end{macrocode} % \end{macro} % @@ -1692,10 +1699,13 @@ % 必要なので、それを行います。 % \changes{v1.3h}{2021/03/14}{\LaTeXe~2021-06-01では % \cs{\_\_shipout\_execute\_nohooks\_cont:}が追加された} +% \changes{v1.3j}{2021/06/03}{巻戻しコードのエラー修正} % \begin{macrocode} -\if_cs_exist:N \__shipout_execute_nohooks_cont: -\cs_new_eq:NN \__platex_original_shipout_execute_nohooks_cont: - \__shipout_execute_nohooks_cont: +\cs_if_exist:NT \__shipout_execute_nohooks_cont: { %--- IF LEVEL 1 BEGIN +\cs_if_exist:NF \__platex_original_shipout_execute_nohooks_cont: { + \cs_new_eq:NN \__platex_original_shipout_execute_nohooks_cont: + \__shipout_execute_nohooks_cont: + } \cs_set:Npn \__shipout_execute_nohooks_cont: { \platex_if_box_yoko:NF \l__shipout_raw_box { @@ -1715,7 +1725,7 @@ } } } -\fi: +} %--- IF LEVEL 1 END \ExplSyntaxOff \fi %--- expl3 available END % -- cgit v1.2.3