summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-11-10 00:01:45 +0000
committerKarl Berry <karl@freefriends.org>2011-11-10 00:01:45 +0000
commitf01a57cb491fec4fe48784ed8a048788ddc572d4 (patch)
tree8bd2b79ee03fc8d87e4dea2daf972fc7cc6e58db /Master/texmf-dist/tex/latex/ledmac/ledpar.sty
parent7ec50efcbabe73cfe05cb85be9ebca8319eb32c6 (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.sty34
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}