1 files changed, 24 insertions, 8 deletions
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledpar.sty b/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
index 68b27b70d4b..8c84333c46e 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/09/16 v0.8 ledmac extension for parallel texts]
+\ProvidesPackage{ledpar}[2011/10/02 v0.9.1 ledmac extension for parallel texts]
 
 \newif\ifshiftedverses
 \shiftedversesfalse
@@ -33,7 +33,6 @@
   \l@dpairingfalse
 \newif\ifl@dpaging
   \l@dpagingfalse
-\newif\ifledRcol
   \ledRcolfalse
 \newdimen\Lcolwidth
   \Lcolwidth=0.45\textwidth
@@ -52,7 +51,6 @@
   \ledmac@error{The right page has ended on a left page}{\@ehc}}
 \newcount\section@numR
   \section@numR=\z@
-\newif\ifnumberingR
   \pst@rtedLfalse
 \newif\ifpst@rtedR
   \pst@rtedRfalse
@@ -88,7 +86,9 @@
   \global\let\sub@change\relax
   \message{Section \the\section@numR R }%
   \line@list@stuffR{\jobname.\extensionchars\the\section@numR R}%
-  \l@dend@stuff}
+  \l@dend@stuff
+  \setcounter{pstartR}{1}
+}
 
 \def\endnumberingR{%
   \ifnumberingR
@@ -731,7 +731,9 @@
 
 \newenvironment{Leftside}{%
   \ledRcolfalse
+  \let\beginnumbering\beginnumbering\setcounter{pstartL}{1}
   \let\pstart\pstartL
+  \let\thepstart\thepstartL
   \let\pend\pendL
   \let\memorydump\memorydumpL
   \Leftsidehook
@@ -748,6 +750,7 @@
   \let\pausenumbering\pausenumberingR
   \let\resumenumbering\resumenumberingR
   \let\memorydump\memorydumpR
+  \let\thepstart\thepstartR
   \let\pstart\pstartR
   \let\pend\pendR
   \let\lineation\lineationR
@@ -760,6 +763,12 @@
 \newcount\num@linesR
 \newbox\one@lineR
 \newcount\par@lineR
+
+\newcounter{pstartL}
+\renewcommand{\thepstartL}{{\bf\@arabic\c@pstartL}. }
+\newcounter{pstartR}
+\renewcommand{\thepstartR}{{\bf\@arabic\c@pstartR}. }
+
 \newcommand*{\pstartL}{
 \if@nobreak
 \let\@oldnobreak\@nobreaktrue
@@ -786,7 +795,7 @@
     \led@err@TooManyPstarts
     \global\l@dnumpstartsL=\l@dc@maxchunks
   \fi
-  \global\setnamebox{l@dLcolrawbox\the\l@dnumpstartsL}=\vbox\bgroup%
+  \global\setnamebox{l@dLcolrawbox\the\l@dnumpstartsL}=\vbox\bgroup\ifautopar\else\ifnumberpstart\thepstartL\fi\fi%
                      \hsize=\Lcolwidth
   \numberedpar@true}
 \newcommand*{\pstartR}{
@@ -815,7 +824,7 @@
     \led@err@TooManyPstarts
     \global\l@dnumpstartsR=\l@dc@maxchunks
   \fi
-  \global\setnamebox{l@dRcolrawbox\the\l@dnumpstartsR}=\vbox\bgroup%
+  \global\setnamebox{l@dRcolrawbox\the\l@dnumpstartsR}=\vbox\bgroup\ifautopar\else\ifnumberpstart\thepstartR\fi\fi%
                      \hsize=\Rcolwidth
   \numberedpar@true}
 \newcommand*{\pendL}{\ifnumbering \else
@@ -829,7 +838,10 @@
   \global\par@line=0
   \endgroup
   \ignorespaces
-  \@oldnobreak}
+  \@oldnobreak
+\ifnumberpstart
+\addtocounter{pstartL}{1}
+\fi}
 
 \newcommand*{\pendR}{\ifnumberingR \else
     \led@err@PendNotNumbered
@@ -842,7 +854,11 @@
   \global\par@lineR=0
   \endgroup
   \ignorespaces
-  \@oldnobreak}
+  \@oldnobreak
+\ifnumberpstart
+\addtocounter{pstartR}{1}
+\fi
+}
 
 \newbox\l@dleftbox
 \newbox\l@drightbox