summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/poemscol
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-08-22 20:24:08 +0000
committerKarl Berry <karl@freefriends.org>2019-08-22 20:24:08 +0000
commitc70862e56903d16c3f4a014431e6bf9f9c378115 (patch)
tree6940bdab3db84d4cfca7cf768c7dc82ca79f12aa /Master/texmf-dist/tex/latex/poemscol
parent52acfcbc7a6ddd3b51671a9686f61b43697c910a (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.sty28
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