Skip to content

Commit

Permalink
Firstaid crop (#971)
Browse files Browse the repository at this point in the history 
* firstaid for crop (mirror option, \stockwidth/\stockheight adaption)

* update hook testfiles

* from review: \LaTeX{} and no \relax

* update hook tests

Co-authored-by: Ulrike Fischer <fischer@troubleshooting-tex.de>
  • Loading branch information
@u-fischer
u-fischer and Ulrike Fischer committed Dec 21, 2022
1 parent d2309bb commit 0c218fe
Show file tree
Hide file tree
Showing 25 changed files with 661 additions and 4 deletions.
1 change: 1 addition & 0 deletions .github/tl_packages
View file
Expand Up @@ -28,6 +28,7 @@ fancyhdr
# special testing for firstaid
bidi
bigfoot
crop
ncctools
dinbrief
everyshi
Expand Down
7 changes: 7 additions & 0 deletions base/testfiles-lthooks/ltcmdhooks-001.tlg
View file
Expand Up @@ -151,6 +151,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -218,6 +224,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down
7 changes: 7 additions & 0 deletions base/testfiles-lthooks/lthooks-000.tlg
View file
Expand Up @@ -91,6 +91,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -142,6 +148,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down
15 changes: 15 additions & 0 deletions base/testfiles-lthooks/lthooks-001.tlg
View file
Expand Up @@ -97,6 +97,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -156,6 +162,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down Expand Up @@ -218,6 +225,7 @@ The sequence \g__hook_all_seq contains the items (without outer braces):
> {file/pgfmorepages.sty/after}
> {file/babel.sty/before}
> {file/songs.sty/after}
> {file/crop.sty/after}
> {file/bigfoot.sty/after}
> {file/ulem.sty/after}
> {file/varwidth.sty/after}
Expand Down Expand Up @@ -318,6 +326,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -375,6 +389,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down
15 changes: 15 additions & 0 deletions base/testfiles-lthooks/lthooks-002.tlg
View file
Expand Up @@ -97,6 +97,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -156,6 +162,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down Expand Up @@ -220,6 +227,7 @@ The sequence \g__hook_all_seq contains the items (without outer braces):
> {file/pgfmorepages.sty/after}
> {file/babel.sty/before}
> {file/songs.sty/after}
> {file/crop.sty/after}
> {file/bigfoot.sty/after}
> {file/ulem.sty/after}
> {file/varwidth.sty/after}
Expand Down Expand Up @@ -320,6 +328,12 @@ Code labels for sorting:
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/crop.sty/after' on input line ...:
Code labels for sorting:
firstaid
Data structure for label rules:
firstaid = 0 ->
Handled code for firstaid
Update code for hook 'file/bigfoot.sty/after' on input line ...:
Update code for hook 'file/ulem.sty/after' on input line ...:
Code labels for sorting:
Expand Down Expand Up @@ -377,6 +391,7 @@ All initialized (non-empty) hooks:
file/pgfmorepages.sty/after -> \__hook_toplevel file/pgfmorepages.sty/after \cs_set_nopar:Npn \pgfhookintoshipout {\cs_set_eq:NN \pgfpages@originalshipout \tex_shipout:D \cs_set_eq:NN \tex_shipout:D \pgfpages@interceptshipout }\__hook_next file/pgfmorepages.sty/after
file/babel.sty/before -> \def \BabelCaseHack {}\__hook_toplevel file/babel.sty/before \__hook_next file/babel.sty/before
file/songs.sty/after -> \__hook_toplevel file/songs.sty/after \FirstAidNeededT {songs}{sty}{....-..-.. v... Songs package}{\renewcommand \SB@obeylines {\let \obeyedline \SB@par \obeylines \let \@par \SB@@par }}\__hook_next file/songs.sty/after
file/crop.sty/after -> \__hook_toplevel file/crop.sty/after \FirstAidNeededT {crop}{sty}{....-..-.. 1.10 crop marks (mf)}{\ifdim \stockwidth > 0pt \else \stockwidth \paperwidth \fi \ifdim \stockheight > 0pt \else \stockheight \paperheight \fi \renewcommand *\CROP@genreflect [1]{\leavevmode \dimen 0\CROP@horigin \kern 2\dimen 0 \begingroup \set@typeset@protect \reflectbox {\hb@xt@ \paperwidth {\vbox to\paperheight {##1\vss }\hss }}\endgroup } }\__hook_next file/crop.sty/after
file/ulem.sty/after -> \__hook_toplevel file/ulem.sty/after \def \@hspace ##1{\begingroup \setlength \skip@ {##1}\edef \x {\endgroup \hskip \the \skip@ \relax }\x }\__hook_next file/ulem.sty/after
file/varwidth.sty/after -> \__hook_toplevel file/varwidth.sty/after \FirstAidNeededT {varwidth}{sty}{....-..-.. ver 0.92; \space Variable-width minipages}{\def \@vwid@sift {\skip@ \lastskip \unskip \ifdim \lastskip =\z@ \unskip \fi \dimen@ \lastkern \unkern \count@ \lastpenalty \unpenalty \setbox \z@ \lastbox \ifvoid \z@ \advance \sift@deathcycles \@ne \else \sift@deathcycles \z@ \fi \ifnum \sift@deathcycles >33 \let \@vwid@sift \relax \PackageWarning {varwidth}{Failed to reprocess entire contents}\fi \ifnum \count@ =\@vwid@preeqp \@vwid@eqmodefalse \fi \ifnum \count@ =\@vwid@posteqp \@vwid@eqmodetrue \fi \ifnum \count@ =\@vwid@toppen \let \@vwid@sift \relax \else \ifnum \count@ =\@vwid@offsets \@vwid@setoffsets \else \ifnum \count@ =\@vwid@postw \else \@vwid@resetb \fi \@vwid@append \fi \fi \@vwid@sift }}\__hook_next file/varwidth.sty/after
file/german.sty/after -> \__hook_toplevel file/german.sty/after \FirstAidNeededT {german}{sty}{....-..-.. v... Support for writing german texts (br)} {\let \grmn@active@dq@ \@active@dq \def \@active@dq {\protect \grmn@active@dq@ }\germanTeX }\__hook_next file/german.sty/after
Expand Down

0 comments on commit 0c218fe

Please sign in to comment.