diff options
| author | Karl Berry <karl@freefriends.org> | 2019-08-22 20:24:08 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2019-08-22 20:24:08 +0000 |
| commit | c70862e56903d16c3f4a014431e6bf9f9c378115 (patch) | |
| tree | 6940bdab3db84d4cfca7cf768c7dc82ca79f12aa /Master/texmf-dist/tex/latex/poemscol | |
| parent | 52acfcbc7a6ddd3b51671a9686f61b43697c910a (diff) | |
poemscol (21aug19)
git-svn-id: svn://tug.org/texlive/trunk@51934 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/poemscol')
| -rw-r--r-- | Master/texmf-dist/tex/latex/poemscol/poemscol.sty | 28 |
1 files changed, 17 insertions, 11 deletions
diff --git a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty index 1a42da65680..15617f71408 100644 --- a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty +++ b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty @@ -22,8 +22,7 @@ %% in the same archive or directory.) \NeedsTeXFormat{LaTeX2e}[1997/12/01] \ProvidesPackage{poemscol} - [2019/08/03 v3 poemscol file] - % must enclose it in square brackets, not curly ones.\end{sloppypar} + [2019/08/18 v3.02 poemscol file] %|\prosexyznote| %% @@ -92,22 +91,29 @@ \hfuzz=2pt \newlength{\verseindentamount} \setlength{\verseindentamount}{2em} -\newcommand{\verseindent}{\hspace{\verseindentamount}} +\newcount\l@@pcounter +\newcommand{\repeatedindent}[1]{\l@@pcounter=#1% +\loop% +\ifnum\l@@pcounter>0% +\hspace{\verseindentamount}% +\advance \l@@pcounter -1 +\repeat} +\newcommand{\verseindent}[1][]{% +\ifthenelse{\equal{#1}{}}{\hspace{\verseindentamount}}{\repeatedindent{#1}}} \newlength{\indentedstanzaamount} \setlength{\indentedstanzaamount}{\verseindentamount} \newlength{\variablestanzaamount} \setlength{\variablestanzaamount}{\indentedstanzaamount} -\newcount\loopcounter -\newcommand{\adjustst@nzaindent}[1]{\loopcounter=#1 -\loop - \addtolength{\variablestanzaamount}{\indentedstanzaamount} - \advance \loopcounter -1 -\ifnum \loopcounter>0 +\newcommand{\adjustst@nzaindent}[1]{\l@@pcounter=#1% +\loop% + \addtolength{\variablestanzaamount}{\indentedstanzaamount}% + \advance \l@@pcounter -1% +\ifnum \l@@pcounter>0 \repeat} \newif\ifinindentedverse \newenvironment{indentedverse}[1][]{% -\inindentedversetrue -\ifthenelse{\equal{#1}{}}{\relax}{\adjustst@nzaindent{#1}} +\inindentedversetrue% +\ifthenelse{\equal{#1}{}}{\relax}{\adjustst@nzaindent{#1}}% \let\\=\@centercr% \list{}{\itemsep\z@ \itemindent -\runoverindentvalue\listparindent \itemindent \rightmargin 0sp\leftmargin 0sp\advance\leftmargin |