addlines: recto/odd pages without error

"Conversely, on an odd page (i.e., a recto or right-side page) an error is produced, but the space is still added."

Well, nowadays that can be solved:

\NeedsTeXFormat{LaTeX2e}[2022-11-01] \ProvidesPackage{addlines}[2023-02-03 v0.4 Add/remove lines from a page (WR)]

\if@filesw \else \IfFileExists{\jobname.aux}{ \PackageWarningNoLine{addlines}{% It was not allowed to write to \jobname.aux.\MessageBreak% A lot of packages do not work\MessageBreak% without write access to files.\MessageBreak% \jobname.aux already exists\MessageBreak% from a preceding compilation run.\MessageBreak% If it would not be changed by this run\MessageBreak% everything is OK, otherwise enable write access.% } }{\PackageError{addlines}{% Writing to \jobname.aux forbidden.}{% \jobname.aux does not exist and\MessageBreak% could not be created,\MessageBreak% therefore it will not be possible\MessageBreak% to add a line to a left side/column\MessageBreak% when the \string\addlines\space command\MessageBreak% is given on the right side/column.\MessageBreak% } } \fi

\RequirePackage{afterpage}[2014/10/28]% v1.08 After-Page Package (DPC) \RequirePackage{changepage}[2009/10/20]% v1.0c check page and change page layout

\newif\if@addlines@checkpage@ \DeclareOption{final}{\@addlines@checkpage@true} \DeclareOption{draft}{\@addlines@checkpage@false} \ExecuteOptions{final} \ProcessOptions

\newcounter{addlinespage} \setcounter{addlinespage}{1}

\newcommand{\enlargepagebefore}{\addtocounter{addlinespage}{+1}}

\AddToHook{shipout/before}{\enlargepagebefore}

\newcommand{\enlargemaybe}[2]{% \edef\al@beforeA{\arabic{addlinespage}}% \edef\al@beforeB{#2}% \ifx\al@beforeA\al@beforeB\relax% \addlines@here{#1}% \if@twocolumn\afterpage{\addlines@here{#1}}\fi% \fi% }

\newcommand\addlines{\@ifstar\addlines@a\addlines@b}

\newcommand\addlines@a[1][1]{\addlines@here{#1}}

\newcommand\addlines@b[1][1]{\addlines@do{#1}}

\newcommand\addlines@here[1]{\enlargethispage{#1\baselineskip}}

\newcommand\addlines@do[1]{% \if@twocolumn\addlines@twocol{#1}% \else\addlines@onecol{#1}% \fi% }

\newcommand\addlines@onecol[1]{% \addlines@here{#1}% \if@twoside% \checkoddpage% \ifoddpage% \if@filesw% \addtocounter{addlinespage}{-1}% \edef\al@beforeD{\arabic{addlinespage}}% \addtocounter{addlinespage}{+1}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to right side.\MessageBreak% Extra lines need to be added\MessageBreak% to both sides of a doublepage spread,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not passible\MessageBreak% ... on line xy. }% \fi% \else% \afterpage{\addlines@here{#1}}% \fi% \fi% }

\newcommand\addlines@twocol[1]{% \if@firstcolumn% \addlines@here{#1}% \afterpage{\addlines@here[1]}% \else% second column \if@filesw% \edef\al@beforeD{\arabic{addlinespage}}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% % enlarges BOTH columns \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to second column.\MessageBreak% Extra lines need to be added\MessageBreak% to both columns of a two column layout,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not possible\MessageBreak% ... on line xy. }% \fi% \fi% \if@twoside% \checkoddpage% \ifoddpage% \if@filesw% \addtocounter{addlinespage}{-1}% \edef\al@beforeD{\arabic{addlinespage}}% \addtocounter{addlinespage}{+1}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% % enlarges BOTH columns \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to right side.\MessageBreak% Extra lines need to be added\MessageBreak% to both sides of a doublepage spread,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not possible\MessageBreak% ... on line xy. }% \fi% \else% \afterpage{\afterpage{\addlines@here{#1}}}% \afterpage{\afterpage{\if@twocolumn\afterpage{\addlines@here{#1}}\fi}}% \fi% \fi% }

\let\addline\addlines

\newcommand\removelines{\@ifstar\removelines@a\removelines@b}

\newcommand\removelines@a[1][1]{\addlines@here{\numexpr -1*(#1) \relax}}

\newcommand\removelines@b[1][1]{\addlines@do{\numexpr -1*(#1) \relax}}

\let\removeline\removelines

\newcommand\squeezepage[1][0]{% \if@twocolumn% \if@firstcolumn% \enlargethispage{#1\baselineskip}% \afterpage{\addlines@here[1]}% to also squeeze that page: \enlargethispage{#1\baselineskip}% \else% second column \if@addlines@checkpage@% \if@filesw% \edef\al@beforeD{\arabic{addlinespage}}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% % enlarges BOTH columns, without squeezing \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to second column.\MessageBreak% Extra lines need to be added\MessageBreak% to both columns of a two column layout,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not possible\MessageBreak% ... on line xy. }% \fi% \fi% \fi% \if@addlines@checkpage@% \if@twoside% \checkoddpage% \ifoddpage% \if@filesw% \addtocounter{addlinespage}{-1}% \edef\al@beforeD{\arabic{addlinespage}}% \addtocounter{addlinespage}{+1}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% % enlarges BOTH columns, without squeezing \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to right side.\MessageBreak% Extra lines need to be added\MessageBreak% to both sides of a doublepage spread,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not possible\MessageBreak% ... on line xy. }% \fi% \else% \afterpage{\afterpage{\addlines@here{#1}}}% without squeezing \afterpage{\afterpage{\if@twocolumn\afterpage{\addlines@here{#1}}\fi}}% without squeezing \fi% \fi% \else% \enlargethispage*{#1\baselineskip}% \if@addlines@checkpage@% \if@twoside% \checkoddpage% \ifoddpage% \if@filesw% \addtocounter{addlinespage}{-1}% \edef\al@beforeD{\arabic{addlinespage}}% \addtocounter{addlinespage}{+1}% \immediate\write\@auxout{\string\AddToHook{cmd/enlargepagebefore/after}{\string\enlargemaybe{#1}{\al@beforeD}}}% % without squeezing \else% \PackageWarning{addlines}{% \string\enlargethispage\space only applied to right side.\MessageBreak% Extra lines need to be added\MessageBreak% to both sides of a doublepage spread,\MessageBreak% but this generally requires writing to the \MessageBreak% \jobname.aux file, which was not possible\MessageBreak% ... on line xy. }% \fi% \else% \afterpage{\addlines@here{#1}}% without squeezing \fi% \fi% \fi% \fi% }

\strictpagechecktrue

\endinput%

wspr / will2e

addlines: recto/odd pages without error #11