diff options
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 |