~tex-sx/tex-sx/development

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
\immediate\write18{tex pullquote.dtx}
    \documentclass{article}
    \usepackage{tikz}
    \usepackage{lipsum}
    \usepackage{booktabs}
    \usepackage[latin]{babel}

    \usepackage{pullquote}

    \def\addquote
    {%
      \Large
      \begin{tabular}[b]{p{5cm}}
        \midrule
        \textit{Wir m\"ussen wissen.}\\
        \textit{Wir werden wissen.}\\
        \mbox{}\hfill\large\textsc{David Hilbert}\\
        \midrule
      \end{tabular}%
    }

    \def\circlegraphic{\tikz\draw (0,0) circle (2.7cm);}

    \begin{document}
    \begin{pullquote}{object=\addquote}
      \lipsum[1-2]
    \end{pullquote}

    \begin{pullquote}{shape=circular,object=\circlegraphic}
      \lipsum[1-3]
    \end{pullquote}

  \end{document}