testing bleeds in cliptocell env...

Signed-off-by: Alex A. Naanou <alex.nanou@gmail.com>
This commit is contained in:
Alex A. Naanou 2023-09-05 17:37:03 +03:00
parent 0a3ef4c170
commit 9ae85d2ea8
2 changed files with 23 additions and 9 deletions

View File

@ -18,6 +18,18 @@
\begin{page} \begin{page}
cliptocellclearances=\cliptocellclearances cliptocellclearances=\cliptocellclearances
\cliptocellbleeds{5pt}
cliptocellclearances=\cliptocellclearances
\cliptocellbleeds{1pt 2pt}
cliptocellclearances=\cliptocellclearances
\cliptocellbleeds{1pt 2pt 3pt 4pt}
cliptocellclearances=\cliptocellclearances
\end{page} \end{page}

View File

@ -93,7 +93,7 @@
%%% NOTE: \def\<module-name>@[A-Z]+ macros will be visible to both the %%% NOTE: \def\<module-name>@[A-Z]+ macros will be visible to both the
%%% code and the generated docs... %%% code and the generated docs...
\edef\photobook@FILEVERSION{v0.1.25} \edef\photobook@FILEVERSION{v0.1.26}
\edef\photobook@FILEDATE{2023-08-24} \edef\photobook@FILEDATE{2023-08-24}
@ -2046,7 +2046,7 @@
\setlength\photobook@cliptocell@right{0mm}% \setlength\photobook@cliptocell@right{0mm}%
\newlength\photobook@cliptocell@bottom \newlength\photobook@cliptocell@bottom
\setlength\photobook@cliptocell@bottom{0mm}% \setlength\photobook@cliptocell@bottom{0mm}%
\def\cliptocellclearances{0mm 0mm 0mm 0mm}% \def\cliptocellclearances{{0mm} {0mm} {0mm} {0mm}}%
%% Set the default bleeds for |cliptocell| environments %% Set the default bleeds for |cliptocell| environments
%% %%
@ -2061,9 +2061,8 @@
%%% %%%
%%% Set by |\cliptocellbleeds{..}| and contains clearances (negative %%% Set by |\cliptocellbleeds{..}| and contains clearances (negative
%%% clipping bleeds) usable by imagecell. %%% clipping bleeds) usable by imagecell.
% %%%
% XXX BUG: bleeds is set correctly for one value but 2 and 4 seem to be %%% XXX still testing....
% misbehaving (see: ./examples/endpaper.tex)
\newcommand\cliptocellbleeds[1]{ \newcommand\cliptocellbleeds[1]{
\setsepchar{ }% \setsepchar{ }%
\readlist*\photobook@cliptocell@bleeds{#1}% \readlist*\photobook@cliptocell@bleeds{#1}%
@ -2099,12 +2098,15 @@
\setlength\photobook@cliptocell@top{% \setlength\photobook@cliptocell@top{%
\photobook@cliptocell@bleeds[4]}\fi% \photobook@cliptocell@bleeds[4]}\fi%
% NOTE: trailing spaces here are significant... % NOTE: trailing spaces here are significant...
% XXX should we use \the here?
% ...it makes things printable...
\def\cliptocellclearances{% \def\cliptocellclearances{%
{-\photobook@cliptocell@left} % {-\the\photobook@cliptocell@left} %
{-\photobook@cliptocell@bottom} % {-\the\photobook@cliptocell@bottom} %
{-\photobook@cliptocell@right} % {-\the\photobook@cliptocell@right} %
{-\photobook@cliptocell@top}}} {-\the\photobook@cliptocell@top}}}
% XXX use \cliptocellclearances as default...
\newenvironment{cliptocell}[1][0mm]{% \newenvironment{cliptocell}[1][0mm]{%
\begingroup% \begingroup%
\cliptocellbleeds{#1} \cliptocellbleeds{#1}