diff options
author | Karl Berry <karl@freefriends.org> | 2011-11-10 00:01:45 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-11-10 00:01:45 +0000 |
commit | f01a57cb491fec4fe48784ed8a048788ddc572d4 (patch) | |
tree | 8bd2b79ee03fc8d87e4dea2daf972fc7cc6e58db /Master/texmf-dist/tex/latex/ledmac/ledmac.sty | |
parent | 7ec50efcbabe73cfe05cb85be9ebca8319eb32c6 (diff) |
ledmac (9nov11)
git-svn-id: svn://tug.org/texlive/trunk@24561 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/ledmac/ledmac.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/ledmac/ledmac.sty | 32 |
1 files changed, 23 insertions, 9 deletions
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledmac.sty b/Master/texmf-dist/tex/latex/ledmac/ledmac.sty index dcd5a7301a3..8c01163223a 100644 --- a/Master/texmf-dist/tex/latex/ledmac/ledmac.sty +++ b/Master/texmf-dist/tex/latex/ledmac/ledmac.sty @@ -23,7 +23,7 @@ %% This work consists of the files listed in the README file. %% \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{ledmac}[2011/10/02 v0.12.1 LaTeX port of EDMAC] +\ProvidesPackage{ledmac}[2011/11/08 v0.13 LaTeX port of EDMAC] \newif\ifledfinal \DeclareOption{final}{\ledfinaltrue} @@ -2453,7 +2453,7 @@ \let\ledllfill\hfil \let\ledrlfill\hfil \def\@tempa{#1}\def\@tempb{l}% - \ifx\@tempa\@tempb + \ifx\@tempa\@tempb \let\ledllfill\relax \else \def\@tempb{r}% @@ -2627,23 +2627,37 @@ \newcommand*{\setstanzaindents}[1]{\setstanzavalues{sza}{#1}} \newcommand*{\setstanzapenalties}[1]{\setstanzavalues{szp}{#1}} +\newcounter{stanzaindentsrepetition} +\newcount\stanza@modulo + +\newcommand*{\managestanza@modulo}[0]{ + \advance\stanza@modulo\@ne + \ifnum\stanza@modulo>\value{stanzaindentsrepetition} + \stanza@modulo\@ne + \fi +} \def\stanza@line{ -\parindent=\csname sza@\number\stanza@count + \ifnum\value{stanzaindentsrepetition}=0 + \parindent=\csname sza@\number\stanza@count @\endcsname\stanzaindentbase - \pstart\stanza@hang\ignorespaces} + \else + \managestanza@modulo + \parindent=\csname sza@\number\stanza@modulo + @\endcsname\stanzaindentbase + \fi + \pstart\stanza@hang\ignorespaces} \xdef\stanza@hang{\noexpand\leavevmode\noexpand\startlock \hangindent\expandafter \noexpand\csname sza@0@\endcsname\stanzaindentbase \hangafter\@ne} \def\sza@penalty{\count@\csname szp@\number\stanza@count @\endcsname - \ifnum\count@>\@M\advance\count@-\@M\penalty-\else - \penalty\fi\count@} - + \ifnum\count@>\@M\advance\count@-\@M\penalty-\else + \penalty\fi\count@} \let\startstanzahook\relax \let\endstanzaextra\relax \xdef\stanza{\noexpand\instanzatrue\expandafter - \begingroup\startstanzahook% - \catcode`\&\active\global\stanza@count\@ne + \begingroup\startstanzahook% + \catcode`\&\active\global\stanza@count\@ne\stanza@modulo\@ne \noexpand\ifnum\expandafter\noexpand \csname sza@0@\endcsname=\z@\let\noexpand\stanza@hang\relax \let\noexpand\endlock\relax\noexpand\else\interlinepenalty |