Skip to content

Commit

Permalink
rename kernel command for makecol
Browse files Browse the repository at this point in the history
  • Loading branch information
u-fischer committed Aug 3, 2023
1 parent d27ee6f commit de317ea
Show file tree
Hide file tree
Showing 4 changed files with 7 additions and 7 deletions.
6 changes: 3 additions & 3 deletions required/latex-lab/latex-lab-new-or-1.dtx
Original file line number Diff line number Diff line change
Expand Up @@ -99,7 +99,7 @@
% We patch \cs{@makecol}, if new-or-2 is loaded too it will overwrite that again.
% \begin{macrocode}
\providecommand\@kernel@before@footins{}
\providecommand\@kernel@before@cclv@new{}
\providecommand\@kernel@tagsupport@@makecol{}

\patchcmd\@makecol
{\vskip\skip\footins}
Expand All @@ -108,15 +108,15 @@

\patchcmd\@makecol
{\let\@elt\relax}
{\@kernel@before@cclv@new\let\@elt\relax}
{\@kernel@tagsupport@@makecol\let\@elt\relax}
{\typeout{Patching \string\@makecol\space for tagging}}{\PATCHerror }

\AddToHook{package/footmisc/after}
{%
\def \@makecol {%
\setbox\@outputbox \box\@cclv
\@outputbox@removebskip
\@kernel@before@cclv@new
\@kernel@tagsupport@@makecol
\let\@elt\relax
\xdef\@freelist{\@freelist\@midlist}%
\global \let \@midlist \@empty
Expand Down
2 changes: 1 addition & 1 deletion required/latex-lab/latex-lab-new-or-2.dtx
Original file line number Diff line number Diff line change
Expand Up @@ -245,7 +245,7 @@
% \fmi{The name is likely to change and it probably will eventually
% be replaced with a socket.}
% \begin{macrocode}
\@kernel@before@cclv@new
\@kernel@tagsupport@@makecol
% \end{macrocode}
% When this code is run any ``here'' floats in the \cs{@outputbox} are already handled, so we
% recycle their registers and put them back to the \cs{@freelist}.
Expand Down
2 changes: 1 addition & 1 deletion required/latex-lab/testfiles/new-or-001.tlg
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
This is a generated file for the l3build validation system.
Don't change this file in any respect.
> \@makecol=macro:
->\setbox \@outputbox \box \@cclv \@outputbox@removebskip \@kernel@before@cclv@new \let \@elt \relax \xdef \@freelist {\@freelist \@midlist }\global \let \@midlist \@empty \UseSocket {@makecol/outputbox}\ifvbox \@kludgeins \@make@specialcolbox \else \@make@normalcolbox \fi \global \maxdepth \@maxdepth .
->\setbox \@outputbox \box \@cclv \@outputbox@removebskip \@kernel@tagsupport@@makecol \let \@elt \relax \xdef \@freelist {\@freelist \@midlist }\global \let \@midlist \@empty \UseSocket {@makecol/outputbox}\ifvbox \@kludgeins \@make@specialcolbox \else \@make@normalcolbox \fi \global \maxdepth \@maxdepth .
<argument> \@makecol
l. ...\ShowCommand\@makecol
-------------------
Expand Down
4 changes: 2 additions & 2 deletions texmf/tex/latex/tagpdf/tagpdf.sty
Original file line number Diff line number Diff line change
Expand Up @@ -3235,7 +3235,7 @@

\AddToHook{begindocument/before}
{
\providecommand\@kernel@before@cclv@new{}
\providecommand\@kernel@tagsupport__tagmakecol{}
\providecommand\@kernel@before@cclv{}
\bool_if:NF \g__tag_mode_lua_bool
{
Expand All @@ -3248,7 +3248,7 @@
\__tag_check_typeout_v:n {====>~In~\token_to_str:N \@makecol\c_space_tl\the\c@page}
\__tag_add_missing_mcs_to_stream:Nn \@cclv {main}
}
\tl_put_right:Nn \@kernel@before@cclv@new
\tl_put_right:Nn \@kernel@tagsupport__tagmakecol
{
\__tag_check_typeout_v:n {====>~In~\token_to_str:N \@makecol\c_space_tl\the\c@page}
\__tag_add_missing_mcs_to_stream:Nn \@outputbox {main}
Expand Down

0 comments on commit de317ea

Please sign in to comment.