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/ledpar.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/ledpar.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/ledmac/ledpar.sty | 34 |
1 files changed, 24 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledpar.sty b/Master/texmf-dist/tex/latex/ledmac/ledpar.sty index 8c84333c46e..842065f6ed6 100644 --- a/Master/texmf-dist/tex/latex/ledmac/ledpar.sty +++ b/Master/texmf-dist/tex/latex/ledmac/ledpar.sty @@ -24,7 +24,7 @@ %% \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{ledpar}[2011/10/02 v0.9.1 ledmac extension for parallel texts] +\ProvidesPackage{ledpar}[2011/11/08 v0.9.2 ledmac extension for parallel texts] \newif\ifshiftedverses \shiftedversesfalse @@ -729,6 +729,8 @@ \@afterindentfalse \secdef\@chapter\@schapter} + \newif\ifinstanzaL + \newif\ifinstanzaR \newenvironment{Leftside}{% \ledRcolfalse \let\beginnumbering\beginnumbering\setcounter{pstartL}{1} @@ -737,7 +739,11 @@ \let\pend\pendL \let\memorydump\memorydumpL \Leftsidehook -}{\Leftsidehookend} + \let\oldstanza\stanza + \renewcommand{\stanza}{\oldstanza\global\instanzaLtrue} +}{ + \let\stanza\oldstanza + \Leftsidehookend} \newcommand*{\Leftsidehook}{} \newcommand*{\Leftsidehookend}{} \newcommand*{\Rightsidehook}{} @@ -755,8 +761,11 @@ \let\pend\pendR \let\lineation\lineationR \Rightsidehook + \let\oldstanza\stanza + \renewcommand{\stanza}{\oldstanza\global\instanzaRtrue} }{% \ledRcolfalse + \let\stanza\oldstanza \Rightsidehookend } @@ -874,7 +883,7 @@ \newcount\@donetotallinesR \newcommand*{\do@lineL}{% - \manageparhangingsymbol +\ifinstanzaL\manageparhangingsymbol\fi \advance\countLline \@ne \ifvbox\namebox{l@dLcolrawbox\the\l@dpscL}% {\vbadness=10000 @@ -907,7 +916,7 @@ \newcommand*{\do@lineRhook}{} \newcommand*{\do@lineR}{% -\manageparhangingsymbol +\ifinstanzaR\manageparhangingsymbol\fi \advance\countRline \@ne \ifvbox\namebox{l@dRcolrawbox\the\l@dpscR}% {\vbadness=10000 @@ -1659,8 +1668,8 @@ \do@lineR \fi \hb@xt@ \hsize{% - \unhbox\l@dleftbox - \hfill \columnseparator \hfill + \hfill \unhbox\l@dleftbox + \hfill \columnseparator \hfill \unhbox\l@drightbox }% \checkraw@text @@ -1676,7 +1685,9 @@ \global\l@dpscR=\z@ \global\l@dnumpstartsL=\z@ \global\l@dnumpstartsR=\z@ - \ignorespaces} + \ignorespaces + \global\instanzaLfalse + \global\instanzaRfalse} \newcommand*{\columnseparator}{% \smash{\rule[-0.2\baselineskip]{\columnrulewidth}{1.05\baselineskip}}} @@ -1692,7 +1703,8 @@ \ifnum\l@dnumpstartsR>\l@dpscR \@pstartstrue \fi - \fi} + \fi +} \newif\ifaraw@text \araw@textfalse @@ -1704,7 +1716,8 @@ \ifvbox\namebox{l@dRcolrawbox\the\l@dpscR} \araw@texttrue \fi - \fi} + \fi +} \newcommand*{\@writelinesinparL}{% \edef\next{% @@ -1823,7 +1836,8 @@ \global\l@dpscR=\z@ \global\l@dnumpstartsL=\z@ \global\l@dnumpstartsR=\z@ - + \global\instanzaLfalse + \global\instanzaRfalse \ignorespaces} \newcommand*{\ledstrutL}{\strut} |