Take the 2-minute tour ×
TeX - LaTeX Stack Exchange is a question and answer site for users of TeX, LaTeX, ConTeXt, and related typesetting systems. It's 100% free, no registration required.

I am trying to automate the solution proposed by egreg to How define a fixed width page, but length > some minimum length, but only as long as needed by hooking into \begin{document} and \end{document}.

So, egreg's solution works fine:

\documentclass{article}
\def\MinimumPaperHeight{12cm}
\usepackage{geometry}
\geometry{paperwidth=\MinimumPaperHeight,paperheight=\maxdimen,margin=1cm}
\usepackage{lipsum}

\begin{document}
\setbox0=\vbox{
\lipsum[1-6]
}
\dimen0=\dp0
\pdfpageheight=\dimexpr\ht0+2cm\relax
\ifdim\pdfpageheight<\MinimumPaperHeight \pdfpageheight=\MinimumPaperHeight \fi
\unvbox0\kern-\dimen0
\end{document}

But can't seem to get this to work:

\documentclass{article}
\def\MinimumPaperHeight{12cm}
\usepackage{geometry}
\geometry{paperwidth=\MinimumPaperHeight,paperheight=\maxdimen,margin=1cm}
\usepackage{lipsum}
\usepackage{environ}

\NewEnviron{MyBox}{
    \setbox0=\vbox{\BODY}%
}{%
    \dimen0=\dp0%
    \pdfpageheight=\dimexpr\ht0+2cm\relax%
    \ifdim\pdfpageheight<\MinimumPaperHeight \pdfpageheight=\MinimumPaperHeight \fi%
    \unvbox0\kern-\dimen0%
}

\AtBeginDocument{\begin{MyBox}}
\AtEndDocument{\end{MyBox}}

\begin{document}
\lipsum[1-6]
\end{document}

Hooking into \AtBeginDocument is per this solution on How to automatically add text immediately after \begin{document}.

share|improve this question
add comment

1 Answer

up vote 8 down vote accepted

This can't work, because \begin{MyBox} needs to see \end{MyBox}, but it doesn't because the document ends before the tokens are actually present: the contents of an environment defined with \NewEnviron is not expanded until it's processed with the expansion of \BODY.

One solution is to hook directly into \document and \enddocument:

\usepackage{etoolbox}

\AtBeginDocument{
  \setbox0=\vbox\bgroup
  \preto\enddocument{\egroup
    \dimen0=\dp0
    \pdfpageheight=\dimexpr\ht0+2cm\relax
    \ifdim\pdfpageheight<\MinimumPaperHeight
      \pdfpageheight=\MinimumPaperHeight
    \fi
    \unvbox0\kern-\dimen0 }
}

(Not heavily tested, sorry.)

share|improve this answer
    
This works great. But, if using the standalone package, need to use [preview=false] option. –  Peter Grill Sep 4 '11 at 19:38
    
This works great, except I can't figure out how to get a footer back in the pdf (using KOMA classes). It seems the footer is arranged based on the original page height (\maxdimen) then cropped off when the document ends. Should I ask another question about this or can you think of an easy way to integrate it as a fix in this solution? –  Caleb Apr 14 at 9:06
    
@Caleb My first attempt would be to add the footer just before \egroup (maybe as a prebuilt box). If you don't succeed, please ask a new question. –  egreg Apr 14 at 9:09
add comment

Your Answer

 
discard

By posting your answer, you agree to the privacy policy and terms of service.

Not the answer you're looking for? Browse other questions tagged or ask your own question.