From 6677917e347c171c9bcbebca1995ea734cd24973 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 21 Nov 2010 19:54:24 +0000 Subject: epigram pd, own package, 20nov10 git-svn-id: svn://tug.org/texlive/trunk@20513 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/generic/epigram/epigram.tex | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 Master/texmf-dist/tex/generic/epigram/epigram.tex (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/tex/generic/epigram/epigram.tex b/Master/texmf-dist/tex/generic/epigram/epigram.tex new file mode 100644 index 00000000000..1542c87661d --- /dev/null +++ b/Master/texmf-dist/tex/generic/epigram/epigram.tex @@ -0,0 +1,20 @@ +% From TeXMaG Volume 2, Number 6 +% Don Hosek. Public domain. +% +\long\def\epigram#1{% We use \long\def to allow the argument + % to span several paragraphs. + \bigskip % extra space above. + \setbox0=\hbox{#1} % put the text into a box + \ifdim\wd0>\critwidth %check the length + \centerline{\vtop{\hsize=\episize\noindent#1}} + % If the length is greater than + % the critical length, make a + % displayed paragraph + \else % otherwise, we just center the text. + \centerline{\box0} + \fi + \smallskip % extra space for the end. +} + +\newdimen\critwidth \critwidth=.75\hsize +\newdimen\episize \episize=.6\hsize -- cgit v1.2.3