stockor 0.1.9 → 0.2

data/templates/print/packages/textpos.sty

@@ -0,0 +1,361 @@
+%%
+%% This is file `textpos.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% textpos.dtx  (with options: `package')
+%% Textpos: absolute positioning of text on the page
+%%%% File: textpos.dtx
+%%%% Copyright 1999, 2001--2003, 2005-7, 2009-12, 2014, Norman Gray
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3
+%% of this license or (at your option) any later version.
+%% The latest version of this license is in
+%%   http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX
+%% version 2005/12/01 or later.
+%%
+%% This work has the LPPL maintenance status `maintained'.
+%%
+%% The Current Maintainer of this work is Norman Gray <http://nxg.me.uk>
+%%
+%% This work consists of the files textpos.dtx and textpos.ins,
+%% and the derived file textpos.cls.
+%%
+%% Author: Norman Gray, norman@astro.gla.ac.uk.
+%% Department of Physics and Astronomy, University of Glasgow, UK
+%%
+%% See the file LICENCE for a copy of the LPPL.
+%%
+%% Mercurial ident: 41b12ce5565c, 2014-01-03 19:15 +0000
+%%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{textpos}[2014/01/03 v1.7j]
+\typeout{Package: textpos 2014/01/03 1.7j, absolute positioning of text on the page}
+ 
+\newif\ifTPshowboxes
+\TPshowboxesfalse
+\DeclareOption{showboxes}{\TPshowboxestrue}
+\newif\ifTP@showtext
+\TP@showtexttrue
+\DeclareOption{noshowtext}{\TP@showtextfalse}
+\newif\ifTP@abspos
+\TP@absposfalse
+\DeclareOption{absolute}{\TP@abspostrue}
+\newif\ifTP@overlay
+\TP@overlayfalse
+\DeclareOption{overlay}{\TP@overlaytrue}
+\newif\ifTP@chatter
+\TP@chattertrue
+\DeclareOption{quiet}{\TP@chatterfalse}
+\DeclareOption{verbose}{\TP@chattertrue}
+\ProcessOptions
+\ifTP@abspos
+  \RequirePackage{everyshi}
+\fi
+\def\TP@xfloat#1[#2]{
+  \par\def\@captype{#1}%
+  \@floatpenalty\z@
+  \color@vbox
+    \normalcolor
+    \vbox\bgroup
+}
+\def\TP@xympar{
+  \PackageError{textpos}
+    {You can't use \protect\marginpar\space within a textblock}
+    {You're using textpos because you _don't_ want things to float around, yes?}}
+\newbox\TP@textbox
+\ifTP@abspos
+  \newbox\TP@holdbox            % starts off void
+  \AtEndDocument{\ifvoid\TP@holdbox \else \hbox{}\fi}
+\fi
+\newdimen\TPHorizModule
+\newdimen\TPVertModule
+\newdimen\TP@margin
+\TP@margin=0pt
+\newdimen\TP@absmargin
+\TP@absmargin=0pt
+\newcommand{\TPMargin}{%
+  \@ifstar\TPMargin@outer\TPMargin@inner
+}
+\newcommand{\TPMargin@inner}[1]{%
+  \TP@margin=#1\relax
+  \ifdim\TP@margin < 0pt
+    \PackageError{textpos}
+      {\protect\TPMargin\space must have a positive argument}
+      {\protect\TPMargin\space must have a positive argument}
+  \fi
+  \TP@absmargin=\TP@margin
+}
+\newcommand\TPMargin@outer[1]{%
+  \TP@margin=-#1\relax
+  \ifdim\TP@margin > 0pt
+    \PackageError{textpos}
+      {\protect\TPMargin*\space must have a positive argument}
+      {\protect\TPMargin*\space must have a positive argument}
+  \fi
+  \TP@absmargin=-\TP@margin
+}
+\def\TPGrid{%
+  \@ifnextchar[{\@tempswatrue\TP@Grid}{\@tempswafalse\TP@Grid[0pt,0pt]}}
+\def\TP@Grid[#1,#2]#3#4{
+  \setlength{\@tempdima}{#1}
+  \multiply\@tempdima by 2
+  \TPHorizModule=\paperwidth
+  \advance\TPHorizModule by -\@tempdima
+  \divide\TPHorizModule by #3
+  \setlength{\@tempdima}{#2}
+  \multiply\@tempdima by 2
+  \TPVertModule=\paperheight
+  \advance\TPVertModule by -\@tempdima
+  \divide\TPVertModule by #4
+  \ifTP@chatter
+    \typeout{Grid set #3 x #4 = \the\TPHorizModule\space x \the\TPVertModule}%
+  \fi
+  \ifTP@abspos\if@tempswa \textblockorigin{#1}{#2}\fi\fi
+}
+\TPGrid{16}{16}
+\newdimen\TPboxrulesize
+\setlength{\TPboxrulesize}{0.4pt}
+\def\showtextsize{\normalsize}
+\ifTP@abspos
+  \newdimen\TP@ox
+  \newdimen\TP@oy
+\fi
+\def\textblockorigin#1#2{%
+  \ifTP@abspos
+    \TP@ox=-1in    \addtolength\TP@ox{#1}
+    \TP@oy=-1in    \addtolength\TP@oy{#2}
+    \ifTP@chatter\typeout{TextBlockOrigin set to #1 x #2}\fi
+  \else
+    \PackageError{textpos}
+      {The \protect\textblockorigin\space command\MessageBreak
+       may only be used if the package was given\MessageBreak
+       the`absolute' option when it was invoked}
+      {If you want to use the \protect\textblockorigin\space command, then
+         \MessageBreak
+       invoke the package with the syntax\MessageBreak
+       \protect\usepackage[absolute]{textpos}}
+  \fi
+  }
+\def\textblocklabel#1{\gdef\TP@textblocklabel{#1}}
+\def\textblockcolour#1{%
+  \@ifundefined{color}%
+    {\PackageWarning{textpos}{command textblockcolour used,\MessageBreak
+       but {color} package not loaded.\MessageBreak
+       Colour changes ignored.}}
+    {\gdef\TP@blockcolour{#1}
+     \ifx\TP@defaultblockcolour\@undefined
+       \gdef\TP@defaultblockcolour{#1}
+     \fi
+    }}
+\def\TP@blockcolour{}           % safe initial default
+\let\textblockcolor\textblockcolour
+\let\tekstblokkulur\textblockcolour
+\def\textblockrulecolour#1{%
+  \@ifundefined{color}%
+    {\PackageWarning{textpos}{command textblockrulecolour used,\MessageBreak
+       but {color} package not loaded.\MessageBreak
+       Colour changes ignored.}}
+    {\gdef\TP@rulecolour{#1}}}
+\def\TP@rulecolour{black}
+\let\textblockrulecolor\textblockrulecolour
+\let\tekstblokroolkulur\textblockrulecolour
+\gdef\TP@color[#1]#2{}
+\def\TP@checkdummycolorpackage{%
+  \@ifundefined{color}%
+    {\globaldefs=1
+       \DeclareRobustCommand\color[2][]{}%
+       \def\color@block##1##2##3{}%
+     \globaldefs=0 }{}%
+  \global\let\TP@checkdummycolorpackage\relax % don't come here again
+}
+\def\textblock#1{%
+  \@tempdima=#1\TPHorizModule
+  \ifvmode\else
+    \ifmmode
+      \PackageError{textpos}
+        {You cannot use textblock in maths mode}
+        {You may use the textblock environment only in \MessageBreak
+         vertical mode or horizontal mode (when it triggers a\MessageBreak
+         new paragraph).  You cannot use it in maths mode.}
+    \else % in horizontal mode
+      \par % force us back into vertical mode
+    \fi
+  \fi
+  \@ifnextchar[{\TP@textblock}{\TP@textblock[0,0]}%] bracematch
+}
+\def\TP@textblockstar#1{%
+  \setlength{\@tempdima}{#1}
+  \ifvmode\else
+    \PackageWarning{textpos}{environment textblock* not in vertical mode.
+      \MessageBreak
+      Environment textblock* should not have any text\MessageBreak
+      or printable material appearing before it.\MessageBreak
+      Alignment may work out wrongly.}%
+    \par % force us back into vertical mode
+  \fi
+  \@ifnextchar[{\TP@textblock}{\TP@textblock[0,0]}%] bracematch
+}
+\expandafter\let\csname textblock*\endcsname\TP@textblockstar
+\newtoks\TP@tbargs
+\def\TP@textblock[#1,#2](#3,#4){%
+  \TP@tbargs={{#1}{#2}{#3}{#4}}%
+  \let\@xfloat\TP@xfloat
+  \let\@xympar\TP@xympar
+  \setbox\TP@textbox=\vbox\bgroup
+    \ifTPshowboxes
+      \TP@checkdummycolorpackage
+      {\color{\TP@rulecolour}\hrule height0pt depth \TPboxrulesize }%
+      \vskip-\TPboxrulesize
+    \fi
+    \ifdim\TP@margin = 0pt
+      \hsize=\@tempdima
+      \textwidth\hsize \columnwidth\hsize \linewidth\hsize
+    \else
+      \vskip\TP@absmargin
+      \@tempdimb=\@tempdima % \@tempdimb is outer box width
+      \hsize=\@tempdima     % \hsize is inner box width
+      \ifdim\TP@margin < 0pt
+        \advance\@tempdimb by 2\TP@absmargin % bigger box
+      \else
+        \advance\hsize by -2\TP@absmargin    % narrower content
+      \fi
+      \hbox to \@tempdimb\bgroup
+        \hskip\TP@absmargin\vbox\bgroup
+          \textwidth\hsize \columnwidth\hsize \linewidth\hsize
+    \fi
+  }
+\def\endtextblock{\global\@tempswatrue\TP@commonendtextblock}
+\@namedef{endtextblock*}{\global\@tempswafalse\TP@commonendtextblock}
+\newdimen\TP@prevdepth
+\def\TP@commonendtextblock{%
+    \ifdim\TP@margin = 0pt
+      \relax
+    \else
+      \egroup % end of inner vbox
+      \hskip\TP@absmargin
+      \egroup % end of inner hbox
+      \vskip \TP@absmargin
+    \fi
+    \ifTPshowboxes
+        \vskip-\TPboxrulesize
+        {\color{\TP@rulecolour}\hrule depth 0pt height \TPboxrulesize}%
+    \fi
+    \egroup % end of \TP@textbox
+  \TP@prevdepth=\prevdepth
+  \prevdepth=-1000pt  % = \nointerlineskip
+  \expandafter\TP@endtextblock\the\TP@tbargs
+  }
+\def\TP@endtextblock#1#2#3#4{%
+  \if@tempswa % modular/unstarred endtextblock
+    \@tempdima=#3\TPHorizModule
+    \@tempdimb=#4\TPVertModule
+  \else % absolute/starred endtextblock
+    \setlength{\@tempdima}{#3}
+    \setlength{\@tempdimb}{#4}
+  \fi
+  \ifdim\TP@margin < 0pt
+    \advance\@tempdima \TP@margin
+    \advance\@tempdimb \TP@margin
+    % #1,#2 are proportions of \TP@textbox size
+    \@tempdimc=-#1\wd\TP@textbox
+    \advance\@tempdima\@tempdimc
+    \@tempdimc=-#2\ht\TP@textbox
+    \advance\@tempdimb\@tempdimc
+  \else
+    % \TP@margin is positive
+    % #1,#2 are proportions of \TP@framebox size = \TP@textbox+2\TP@margin
+    \@tempdimc=\wd\TP@textbox
+    \advance\@tempdimc 2\TP@margin
+    \@tempdimc=#1\@tempdimc
+    \advance\@tempdima -\@tempdimc
+    \@tempdimc=\ht\TP@textbox
+    \advance\@tempdimc 2\TP@margin
+    \@tempdimc=#2\@tempdimc
+    \advance\@tempdimb -\@tempdimc
+  \fi
+  \ifTP@abspos
+    \advance\@tempdima by \TP@ox
+    \advance\@tempdimb by \TP@oy
+  \fi
+  \setbox0=\vbox to 0pt{\vskip\@tempdimb
+    \hbox to 0pt{\hskip\@tempdima
+    \ifx\TP@blockcolour\@empty \else
+      {\TP@checkdummycolorpackage
+       \color{\TP@blockcolour}%
+       \color@block{\wd\TP@textbox}{\ht\TP@textbox}{\dp\TP@textbox}%
+      }%
+    \fi
+    \ifx\TP@defaultblockcolour\@undefined \else
+      \global\let\TP@blockcolour\TP@defaultblockcolour
+    \fi
+    \ifTPshowboxes
+      {\color{\TP@rulecolour}\vrule width \TPboxrulesize}%
+      \hskip -\TPboxrulesize
+    \fi
+    \ifTP@showtext
+      \box\TP@textbox
+    \else
+      \vbox to\ht\TP@textbox{%
+        \ifTPshowboxes
+          {\color{\TP@rulecolour}\hrule depth 0pt height \TPboxrulesize \vskip-\TPboxrulesize}%
+        \fi
+        \vskip\smallskipamount
+        \hbox to\wd\TP@textbox{%
+          \ifx\TP@textblocklabel\undefined
+            \hbox{}%
+          \else
+            \hskip\smallskipamount
+            \fbox{\showtextsize \TP@textblocklabel}%
+            \global\let\TP@textblocklabel\undefined
+          \fi
+          \hss
+        }%
+        \vss
+        \ifTPshowboxes
+          \vskip -\TPboxrulesize
+          {\color{\TP@rulecolour}\hrule depth 0pt height \TPboxrulesize}%
+        \fi
+      }%
+    \fi
+    \ifTPshowboxes
+      \hskip -\TPboxrulesize
+      {\color{\TP@rulecolour}\vrule width \TPboxrulesize}%
+    \fi
+    \hss}%
+  \vss
+  }%  end of box0
+  \ifTP@abspos
+    \global\setbox\TP@holdbox\vbox{%
+      \unvbox\TP@holdbox
+      \box0
+    }%
+  \else
+    \box0
+    \prevdepth=\TP@prevdepth
+  \fi
+  }%
+\ifTP@abspos
+  \ifTP@overlay
+    \EveryShipout{%
+      \global\setbox\@cclv\vbox{%
+        \vbox to 0pt{\ifvbox\@cclv \unvbox\@cclv \else \box\@cclv \fi \vss}%
+        \unvbox\TP@holdbox      % TP@holdbox is now void
+      }
+    }%
+  \else
+    \EveryShipout{%
+      \global\setbox\@cclv\vbox{%
+        \unvbox\TP@holdbox
+        \ifvbox\@cclv \unvbox\@cclv \else \box\@cclv \fi
+      }%
+    }%
+  \fi
+  \textblockorigin{0pt}{0pt}%
+\fi
+\endinput
+%%
+%% End of file `textpos.sty'.

data/templates/print/packages/varwidth.sty

@@ -0,0 +1,318 @@
+% varwidth.sty  v 0.92  Mar 2009  Donald Arseneau asnd@triumf.ca
+%
+% Copyright 2003-2004,2009 by Donald Arseneau (asnd@triumf.ca).
+% This software is released under the terms of the LaTeX Project Public 
+% License  (ftp://ctan.tug.org/tex-archive/macros/latex/base/lppl.txt).
+% (Essentially: Free to use, copy, distribute (sell) and change, but, if
+% changed, that fact must be clearly displayed to the user.)
+%
+% The varwidth environment is based on minipage, and takes the same
+% parameters, but the specified width is just a maximum value -- the
+% environment will be typeset with a narrower "natural" width if
+% possible.
+%
+% In a varwidth environment, paragraph line-breaks are chosen
+% according to the specified width, but each line is reset to 
+% match a narrower natural width, if there is one.
+%
+% The \narrowragged command works like \raggedright, but produces 
+% generally narrower lines in paragraphs, with more text in the last 
+% line (the lines have more-equal lengths).
+%
+% This version works fine, but there are still many questions about
+% how it would work best.  Should there be a version that avoids the
+% usual minipage formatting style?
+%
+% Numbered equations are not handled well, especially with leqno.
+% AMSmath environments have not been tried, and undoubtedly fail.
+%
+% To do:  Extend v-list wrappers to handle all e-TeX primitives.
+%         (pdfTeX too?)
+%         Capture marks and floats, propagating them out of the box
+%         Support numbered equations, including ams math.
+% 
+
+\ProvidesPackage{varwidth}[2009/03/30 ver 0.92; \space 
+    Variable-width minipages]
+
+\newcommand\narrowragged{\rightskip \z@ plus .25\hsize 
+  \@rightskip\rightskip \parfillskip\z@ plus .15\hsize
+  \sloppy }
+
+\newbox\@vwid@box
+
+% The varwidth environment is based on minipage, and takes the same
+% parameters, but the specified width is only a limit -- a narrower
+% natural width may be used.  \varwidth uses \minipage.
+
+\def\varwidth{\let\@minipagerestore\@vwid@setup \minipage}
+
+% Many things may appear on vertical lists that can't be re-processed,
+% so they have to be modified. 
+
+\def\@vwid@setup{%
+  % several things can't appear in vertical mode, so they may get 
+  % a \vbox wrapped around them.
+  \let\@bsphack\@vwid@bsphack % \label and others
+  \let\mark\@gobble % Marks disappear in minipages anyway
+  \let\special\@vwid@special % \color and others
+  \let\pdfliteral\@vwid@pdfliteral % \color and others
+  \let\addtocontents\@vwid@addtocontents % \addcontentsline
+  % Shifted boxes (\parshape,\hangindent) will have their shifts
+  % indicated in a separate box.
+  \let\@hangfrom\@vwid@hangfrom % hanging indents
+  \let\list\@vwid@list
+  \let\endtrivlist\@vwid@endtrivlist
+  \postdisplaypenalty\@vwid@posteqp
+  \predisplaypenalty\@vwid@preeqp
+  \def\@eqnnum{\aftergroup\@vwid@afterva\@@vwid@eqnnum}%
+  \global\@vwid@roff\z@  \global\@vwid@loff\z@
+  % Begin an inner minipage-like vertical box (in \@tempboxa)
+  \let\@minipagerestore\@@vwid@minipagerestore \@minipagerestore
+  \setbox\@tempboxa\vbox\bgroup\begingroup
+  % Flag the top of the list
+  \penalty\@vwid@toppen
+}
+
+\let\@@vwid@minipagerestore\@minipagerestore
+
+%  At end of varwidth environment.
+\def\endvarwidth{\par\@@par
+   \unskip
+   % Handle minipage-style notes.
+   \ifvoid\@mpfootins\else
+     \vskip\skip\@mpfootins
+     \normalcolor
+     \@vwid@wrap\footnoterule
+     \unvbox\@mpfootins
+   \fi
+   \unskip
+   \@minipagefalse
+   \endgroup\egroup % got my \@tempboxa
+   %{\showoutput\showbox\@tempboxa}%
+   % in a discarded box, sift through list measuring max width.
+   \begingroup\setbox\z@\vbox\bgroup
+%\message{-------------------------------------------------------------}%
+%\message{First pass; hsize=\the\hsize...  }%{\tracingall\showlists}%%
+     \unvcopy\@tempboxa
+     \@tempdima-\maxdimen
+     \let\@vwid@resetb\@vwid@measure
+     \let\@vwid@append\relax
+     \sift@deathcycles\z@
+     \@vwid@sift
+     \xdef\@vwid@{\the\@tempdima}%
+   \egroup\endgroup
+   % Done measuring.  Now empty \@tempboxa onto current vertical list
+   % which is the contents of a minipage environment
+%\message{Got natural width \@vwid@ (compare \the\hsize) }%
+   \unvbox\@tempboxa
+   % Choose the natural width or the declared width, whichever is smaller.
+   \ifdim\@vwid@<\hsize
+     \hsize\@vwid@
+   \fi
+   % Go through the vertical list reboxing and moving everything into
+   % \@vwid@box; then spill \@vwid@box.  If the natural width is narrower,
+   \setbox\@vwid@box\vbox{}%
+   \sift@deathcycles\z@
+%\message{----------------------------------------------------------------}%
+%\message{Second pass; hsize=\the\hsize...  }%{\tracingall\showlists}%
+   \@vwid@sift
+%\message{After sifting:}%
+%{\showoutput\showbox\@vwid@box}%
+   \unvbox\@vwid@box
+   % end the minipage environment
+   \endminipage}
+
+%
+% Here are definitions for sifting through the vertical list, either
+% measuring things or reboxing them.  
+%
+% Penalties used as signals to the vertical-list processor:
+
+\mathchardef\@vwid@posteqp  17321 % Penalty below equations
+\mathchardef\@vwid@preeqp   17322 % Penalty above equations
+\mathchardef\@vwid@postnump 17323 % Penalty below numbered equations
+\mathchardef\@vwid@toppen   17324 % Penalty marking top of vertical list
+\mathchardef\@vwid@offsets  17325 % Penalty below special h-offsets box
+\mathchardef\@vwid@postw    17326 % Penalty below a \vbox-wrapped object
+
+\newcount\sift@deathcycles
+
+\def\@vwid@sift{%
+  \skip@\lastskip\unskip
+  \dimen@\lastkern\unkern
+  \count@\lastpenalty\unpenalty
+  \setbox\z@\lastbox
+%{\showoutput\showbox\z@}%
+  \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
+%\message{\the\sift@deathcycles: skip \the\skip@; kern \the\dimen@; penalty \the\count@. }%
+%\ifhbox\z@\setbox99\hbox to0pt{\unhcopy\z@}\fi  % = message
+  \ifnum\count@=\@vwid@preeqp \@vwid@eqmodefalse\fi
+%\ifnum\count@=\@vwid@preeqp \message{End equation mode. }\fi
+  \ifnum\count@=\@vwid@posteqp \@vwid@eqmodetrue\fi
+%\ifnum\count@=\@vwid@posteqp\message{Begin equation mode. }\fi
+%\if@vwid@eqmode {\showoutput\showbox\z@}\fi
+  \ifnum\count@=\@vwid@toppen % finished
+    \let\@vwid@sift\relax
+  \else\ifnum\count@=\@vwid@offsets
+    \@vwid@setoffsets
+  \else
+    \ifnum\count@=\@vwid@postw
+    \else
+      \@vwid@resetb % reset box \z@ or measure it
+    \fi
+    \@vwid@append
+  \fi\fi
+  \@vwid@sift}
+
+\def\@vwid@setoffsets{%
+ \setbox\z@=\hbox{\unhbox\z@
+  \global\@vwid@roff\lastkern\unkern
+  \global\@vwid@loff\lastkern\unkern}%
+%\message{Set offsets to \the\@vwid@loff,  \the\@vwid@roff. }%
+}
+
+\def\@vwid@append{% Append contents of box \z@ and glue to \@vwid@box
+  \setbox\@vwid@box\vbox{%
+    \unvbox\z@
+    \ifdim\dimen@=\z@\else \kern\dimen@ \fi
+    \vskip\skip@
+    \unvbox\@vwid@box
+  }%{\tracingall\showbox\@vwid@box}%
+}
+
+%  reset box \z@ to \hsize, applying shifts, and wrap in vbox
+%  Don't worry about numbered equations because we won't get
+%  here if there are any.
+\def\@vwid@resetb{%
+  \setbox\z@\vbox\bgroup
+    \ifvoid\z@
+    \else
+       \ifvbox\z@
+         \box\z@
+       \else % \hbox
+         \@tempdima\hsize
+         \advance\@tempdima-\@vwid@roff
+         \advance\@tempdima-\@vwid@loff
+         \advance\@tempdima-\p@
+%\message{Test if \the\wd\z@ > \the\@tempdima, }%
+         \ifdim\wd\z@>\@tempdima % full-width line; rebox it
+%\message{An ordinary line or alignment. (\the\wd\z@ > \the\@tempdima) }%
+            \hbox to\hsize
+              {\kern\@vwid@loff \unhbox\z@ \kern\@vwid@roff}%
+         \else % an equation or direct \hbox
+           \if@vwid@eqmode % re-center unnumbered equations
+%\message{A centered equation hsize=\the\hsize. }%
+              \hbox to\hsize
+                {\hskip\@vwid@loff\@plus1fil
+                 \unhbox\z@ \hskip\@vwid@roff\@plus1fil}%
+           \else % plain narrow \hbox; leave it as-is
+%\message{Plain narrow box}%
+              \box\z@
+    \fi\fi\fi\fi
+  \egroup}
+
+
+% Measure a line (in box \z@) and keep a running tally of the
+% widest natural width in \@tempdima
+
+\def\@vwid@measure{%
+  \ifvoid\z@
+  \else
+    % numbered equations not part of alignments can't be reset,
+    % so force retention of full width.
+    \ifnum\count@=\@vwid@postnump \ifdim\wd\z@<\linewidth
+      \ifdim\@tempdima<\linewidth \@tempdima\linewidth \fi
+    \fi\fi
+    \ifhbox\z@
+      \setbox\z@=\hbox
+        {\kern\@vwid@loff \unhbox\z@ \kern\@vwid@roff}%
+    \fi
+    \ifdim\wd\z@>\@tempdima \@tempdima\wd\z@ \fi
+  \fi}
+
+\newdimen\@vwid@loff
+\newdimen\@vwid@roff
+
+\let\@@bsphack\@bsphack
+\let\@@esphack\@esphack
+\let\@@Esphack\@Esphack
+
+\def\@vwid@bsphack{\@@bsphack
+  \ifx\@vwid@wrap\@firstofone
+    \bgroup
+  \else
+    \ifvmode
+      \setbox\@vwid@box \vbox\bgroup \vbox\bgroup
+      \let\@vwid@wrap\@firstofone
+      \def\@esphack{\@vwid@esphack\@@esphack}%
+      \def\@Esphack{\@vwid@esphack\@@Esphack}%
+    \fi
+  \fi}
+
+\def\@vwid@esphack{\egroup
+  \ifx\@vwid@wrap\@firstofone\else
+    \egroup % end outer box
+    \unvbox\@vwid@box % put inner box on list without lineskip
+    \penalty\@vwid@postw
+  \fi}
+
+% \vbox Wrapper for misc vlist items
+\long\def\@vwid@wrap{\relax
+  \ifvmode\expandafter\@vwid@dowrap \else \expandafter\@firstofone \fi}
+\long\def\@vwid@dowrap#1{%
+  \setbox\@vwid@box \vbox{\vbox{\let\@vwid@wrap\@firstofone
+    #1}\penalty\@vwid@postw
+  }\unvbox\@vwid@box }
+
+\let\@@vwid@special\special
+\let\@@vwid@pdfliteral\pdfliteral
+\let\@@vwid@addtocontents\addtocontents
+\let\@@vwid@list\list
+\let\@@vwid@endtrivlist\endtrivlist
+\let\@@vwid@eqnnum\@eqnnum
+
+\long\def\@vwid@special#1{\@vwid@wrap{\@@vwid@special{#1}}}
+\long\def\@vwid@pdfliteral#1{\@vwid@wrap{\@@vwid@pdfliteral{#1}}}
+\long\def\@vwid@addtocontents#1#2{\@vwid@wrap{\@@vwid@addtocontents{#1}{#2}}}
+
+\long\def\@vwid@hangfrom#1{\par
+  \setbox\@tempboxa\hbox{{#1}}%
+  \setbox\@vwid@box \vbox{\hbox{\kern\z@ \kern\z@
+   }\penalty\@vwid@offsets}\unvbox\@vwid@box
+  \def\par{\relax\ifhmode\unskip\fi
+    \vadjust{\hbox{\kern\hangindent\kern\z@}\penalty\@vwid@offsets}%
+    \@restorepar\par}%
+  \hangindent \wd\@tempboxa\noindent\box\@tempboxa}
+
+\def\@vwid@list{\@vwid@setlist\@@vwid@list}
+\def\@vwid@endtrivlist{\@vwid@setlist\@@vwid@endtrivlist}
+
+\def\@vwid@setlist{\relax\ifhmode \unskip\expandafter\vadjust\fi
+  {\setbox\@vwid@box \vbox{\hbox{%
+    \advance\hsize-\linewidth \advance\hsize-\@totalleftmargin
+    \kern\@totalleftmargin  \kern\hsize}%
+    \penalty\@vwid@offsets}%
+   \unvbox\@vwid@box}}
+
+\newif\if@vwid@eqmode
+
+\def\@vwid@afterva{\vadjust{\penalty\@vwid@postnump}}
+
+%  Should I do this? ...
+
+\@ifundefined{newcolumntype}{}{%
+ \@ifundefined{NC@rewrite@V}{
+ \newcolumntype{V}[1]{%
+   >{\begin{varwidth}[t]{#1}\narrowragged\let\\\tabularnewline}%
+   l%
+   <{\@finalstrut\@arstrutbox\end{varwidth}}}
+ }{}
+}
+
+% V 0.91  Always restack contents, even if width didn't change.
+% V 0.92  fix \special, \pdfliteral

data/templates/print/partials/address.tex.erb

@@ -0,0 +1,6 @@
+\begin{tabular}{l}
+<% unless @address.name.blank? %><%=q  @address.name %> \\<% end %>
+<% unless @address.line1.blank? %><%=q  @address.line1 %> \\<% end %>
+<% unless @address.line2.blank? %><%=q  @address.line2 %> \\<% end %>
+<% unless @address.city.blank? %><%=q  @address.city %>, <% end %><%=q  @address.state %> <%=q  @address.postal_code %> \\
+\end{tabular}

data/templates/print/partials/bill_to_ship_to.tex.erb

@@ -0,0 +1,13 @@
+\noindent\begin{tabu} to\linewidth{X[pc]X[pc]}
+\multicolumn{1}{l}{\textbf{Bill To:}} & \multicolumn{1}{l}{\textbf{Ship To:}}\\
+\parbox{115\unitlength}{
+  <%=partial 'address', address: @record.billing_address %>
+} &
+  \parbox{115\unitlength}{
+    %<% if @record.shipping_address.blank? %>
+\emph{Same as Billing}
+%<% else %>
+<%=partial 'address', address: @record.shipping_address %>
+%<% end %>
+} \\
+\end{tabu}

data/templates/print/partials/header.tex.erb

@@ -0,0 +1,13 @@
+\lhead{
+  \begin{tabularx}{\textwidth} {lXr}
+    %<% if @location.get_logo.present? %>
+\raisebox{1mm}{\includegraphics[align=t,height=18mm,keepaspectratio]{<%= @location.get_logo.file.path %>}}
+  %<% end %>
+& \small <%= break_lines @location.address.to_s(include: [:email,:phone]) -%>
+& \raisebox{-6.5mm}{{\begin{tabularx}{4cm}{Xr}
+      \multicolumn{2}{c}{\Ovalbox{\parbox[c]{4cm}{\centering\bf <%=q @form_title %>}}} \\[2mm]
+  Date: & <%=q @date.strftime("%b #{Skr::Number.ordinalize(@date.day)}, %Y") %> \\[1mm]
+ Page: & \thepage{} of \pageref{LastPage} \\
+ \end{tabularx}}} \\
+\end{tabularx}
+}