summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/eledmac/eledpar.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/eledmac/eledpar.sty')
-rw-r--r--Master/texmf-dist/tex/latex/eledmac/eledpar.sty508
1 files changed, 269 insertions, 239 deletions
diff --git a/Master/texmf-dist/tex/latex/eledmac/eledpar.sty b/Master/texmf-dist/tex/latex/eledmac/eledpar.sty
index 07d9fadb905..f1fd61f5c34 100644
--- a/Master/texmf-dist/tex/latex/eledmac/eledpar.sty
+++ b/Master/texmf-dist/tex/latex/eledmac/eledpar.sty
@@ -23,7 +23,7 @@
%% This work consists of the files listed in the README file.
%%
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{eledpar}[2015/03/22 v1.14.0 eledmac extension for parallel texts]%
+\ProvidesPackage{eledpar}[2015/04/13 v1.15.0 eledmac extension for parallel texts]%
\RequirePackage{xspace}%
\newif\ifshiftedpstarts
@@ -166,19 +166,28 @@
\ifx\@tempa\@tempb
\global\bypage@Rtrue
\global\bypstart@Rfalse
+ \unless\ifnocritical@%
+ \pstartinfootnote[][false]%
+ \fi%
\else
\def\@tempb{pstart}%
\ifx\@tempa\@tempb
\global\bypage@Rfalse
\global\bypstart@Rtrue
+ \unless\ifnocritical@%
+ \pstartinfootnote%
+ \fi%
\else
\def@tempb{section}
\ifx\@tempa\@tempb
- \global\bypage@Rfalse
- \global\bypstart@Rfalse
+ \global\bypage@Rfalse%
+ \global\bypstart@Rfalse%
+ \unless\ifnocritical@%
+ \pstartinfootnote[][false]%
+ \fi%
\else
\led@warn@BadLineation
- \fi
+ \fi%
\fi
\fi
\fi}}
@@ -550,15 +559,6 @@
\fi}
\global\let\lock@off=\do@lockoff
-\providecommand*{\n@num}{}
-\renewcommand*{\n@num}{%
- \ifledRcol
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \xright@appenditem{-1007}\to\actions@listR
- \else
- \n@num@reg
- \fi}
-
\newcount\insert@countR
\renewcommand*{\@ref}[2]{%
\ifledRcol
@@ -668,13 +668,6 @@
\else \write\linenum@out{\string\lock@off}%
\fi}
-\renewcommand*{\skipnumbering}{%
- \ifledRcol \write\linenum@outR{\string\n@num}%
- \advanceline{-1}%
- \else
- \skipnumbering@reg
- \fi}
-
\renewcommand*{\set@line}{%
\ifledRcol
@@ -698,35 +691,44 @@
\fi}
\newcommand{\newseries@eledpar}[1]{%
- \csgdef{onlysideX@#1}{}%
- \csgdef{onlyXside@#1}{}%
- \global\newbool{keepforXside@#1}%
- \global\newbool{keepforsideX@#1}%
- \expandafter\list@create\csname footnote#1@mk\endcsname%
- \expandafter\newcommand\csname footnote#1nomk\endcsname[1]{%
- \toggletrue{nomk@}%
- \csuse{footnote#1}{##1}%
- \togglefalse{nomk@}%
- \letcs{\@tmp}{footnote#1@mk}%
- \numdef\@tmpa{\csuse{c@footnote#1}}%
- \global\xright@appenditem{\@tmpa}\to\@tmp%
- \global\cslet{footnote#1@mk}{\@tmp}%
- }%
- \expandafter\newcommand\csname footnote#1mk\endcsname{%
- \letcs{\@tmp}{footnote#1@mk}%
- \gl@p\@tmp\to\@tmpa%
- \global\cslet{footnote#1@mk}{\@tmp}%
- \letcs{\old@footnote}{c@footnote#1}%
- \setcounter{footnote#1}{\@tmpa}%
- \protected@csxdef{@thefnmark#1}{\csuse{thefootnote#1}}%
- \csuse{@footnotemark#1}%
- \setcounter{footnote#1}{\old@footnote}%
- \xspace%
- }%
+ \unless\ifnocritical@%
+ \csgdef{onlysideX@#1}{}%
+ \global\newbool{keepforXside@#1}%
+ \fi%
+ \unless\ifnofamiliar@%
+ \global\newbool{keepforsideX@#1}%
+ \csgdef{onlyXside@#1}{}%
+ \fi%
+ \unless\ifnofamiliar@%
+ \expandafter\list@create\csname footnote#1@mk\endcsname%
+ \expandafter\newcommand\csname footnote#1nomk\endcsname[1]{%
+ \toggletrue{nomk@}%
+ \csuse{footnote#1}{##1}%
+ \togglefalse{nomk@}%
+ \letcs{\@tmp}{footnote#1@mk}%
+ \numdef\@tmpa{\csuse{c@footnote#1}}%
+ \global\xright@appenditem{\@tmpa}\to\@tmp%
+ \global\cslet{footnote#1@mk}{\@tmp}%
+ }%
+ \expandafter\newcommand\csname footnote#1mk\endcsname{%
+ \letcs{\@tmp}{footnote#1@mk}%
+ \gl@p\@tmp\to\@tmpa%
+ \global\cslet{footnote#1@mk}{\@tmp}%
+ \letcs{\old@footnote}{c@footnote#1}%
+ \setcounter{footnote#1}{\@tmpa}%
+ \protected@csxdef{@thefnmark#1}{\csuse{thefootnote#1}}%
+ \csuse{@footnotemark#1}%
+ \setcounter{footnote#1}{\old@footnote}%
+ \xspace%
+ }%
+ \fi
}%
-\newhookcommand@series{onlysideX}%
-
-\newhookcommand@series{onlyXside}%
+\unless\ifnocritical@%
+ \newhookcommand@series{onlyXside}%
+\fi%
+\unless\ifnofamiliar@%
+ \newhookcommand@series{onlysideX}%
+\fi
\newcommand{\init@series@eledpar}{%
\def\do##1{\newseries@eledpar{##1}}%
@@ -884,6 +886,7 @@
\ifstrempty{#1}%
{\csgdef{before@pstartL@\the\l@dnumpstartsL}{\at@every@pstart}}%
{\csgdef{before@pstartL@\the\l@dnumpstartsL}{\noindent#1}}%
+ \at@every@pstart@call%
}
\newcommandx*{\pstartR}[1][1]{%
\if@nobreak%
@@ -931,6 +934,7 @@
\ifstrempty{#1}%
{\csgdef{before@pstartR@\the\l@dnumpstartsR}{\at@every@pstart}}%
{\csgdef{before@pstartR@\the\l@dnumpstartsR}{\noindent#1}}%
+ \at@every@pstart@call%
}
\newcommandx*{\pendL}[1][1]{%
\ifnumbering \else%
@@ -977,6 +981,8 @@
{\csgdef{after@pendR@\the\l@dnumpstartsR}{\noindent#1}}%
}
+\newcommand{\AtEveryPstartCall}[1]{\xdef\at@every@pstart@call{\unexpanded{#1}}}%
+\gdef\at@every@pstart@call{}%
\newif\ifprint@last@after@pendL%
\newif\ifprint@last@after@pendR%
\newbox\l@dleftbox
@@ -994,34 +1000,39 @@
\newcommand*{\do@lineL}{%
\letcs{\ifnumberpstart}{numberpstart@L\the\l@dpscL}%
- \advance\countLline \@ne
+ \advance\countLline \@ne%
\ifvbox\namebox{l@dLcolrawbox\the\l@dpscL}%
- {\vbadness=10000
- \splittopskip=\z@
- \do@lineLhook
- \l@demptyd@ta
- \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}
+ {\vbadness=10000%
+ \splittopskip=\z@%
+ \do@lineLhook%
+ \l@demptyd@ta%
+ \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}%
to\baselineskip}%
- \IfStrEq{\splitfirstmarks\parledgroup@}{begin}{\parledgroup@notes@startL}{}
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@numL
+ \IfStrEq{\splitfirstmarks\parledgroup@}{begin}{\parledgroup@notes@startL}{}%
+ \unvbox\one@line \global\setbox\one@line=\lastbox%
+ \getline@numL%
\ifnum\@lock>\@ne%
\inserthangingsymboltrue%
\else%
\inserthangingsymbolfalse%
- \fi
- \setbox\l@dleftbox
+ \fi%
+ \setbox\l@dleftbox%
\hb@xt@ \Lcolwidth{%
- \affixline@num
+ \ifl@dhidenumber%
+ \global\l@dhidenumberfalse%
+ \f@x@l@cks%
+ \else%
+ \affixline@num%
+ \fi%
\xifinlist{\the\l@dpscL}{\eled@sections@@}%
{\add@inserts\affixside@note}%
{\print@lineL}}%
- \add@penaltiesL
- \global\advance\@donereallinesL\@ne
- \global\advance\@donetotallinesL\@ne
-\else
+ \add@penaltiesL%
+ \global\advance\@donereallinesL\@ne%
+ \global\advance\@donetotallinesL\@ne%
+\else%
\setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
- \global\advance\@donetotallinesL\@ne
+ \global\advance\@donetotallinesL\@ne%
\fi}
\def\print@lineL{%
@@ -1029,14 +1040,14 @@
\l@dld@ta %space kept for backward compatibility
\add@inserts\affixside@note%
\l@dlsn@te %space kept for backward compatibility
- {\ledllfill\hb@xt@ \wd\one@line{%
+ {\ledllfill\hb@xt@ \Lcolwidth{%
\do@insidelineLhook%
\ifluatex%
\luatextextdir\l@luatextextdir@L%
\fi%
\new@lineL%
\inserthangingsymbolL%
- \l@dunhbox@line{\one@line}}\correcthangingL\ledrlfill\l@drd@ta%
+ \l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
\l@drsn@te}}
\def\print@eledsectionL{%%
@@ -1080,36 +1091,41 @@
\newcommand*{\do@lineR}{%
\letcs{\ifnumberpstart}{numberpstart@R\the\l@dpscR}%
\ledRcol@true%
- \advance\countRline \@ne
+ \advance\countRline \@ne%
\ifvbox\namebox{l@dRcolrawbox\the\l@dpscR}%
- {\vbadness=10000
- \splittopskip=\z@
- \do@lineRhook
- \l@demptyd@ta
- \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}
+ {\vbadness=10000%
+ \splittopskip=\z@%
+ \do@lineRhook%
+ \l@demptyd@ta%
+ \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}%
to\baselineskip}%
- \IfStrEq{\splitfirstmarks\parledgroup@}{begin}{\parledgroup@notes@startR}{}
- \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
- \getline@numR
+ \IfStrEq{\splitfirstmarks\parledgroup@}{begin}{\parledgroup@notes@startR}{}%
+ \unvbox\one@lineR \global\setbox\one@lineR=\lastbox%
+ \getline@numR%
\ifnum\@lockR>\@ne%
- \inserthangingsymbolRtrue
+ \inserthangingsymbolRtrue%
\else%
\inserthangingsymbolRfalse%
\fi%
- \setbox\l@drightbox
+ \setbox\l@drightbox%
\hb@xt@ \Rcolwidth{%
- \affixline@numR%
+ \ifl@dhidenumber%
+ \global\l@dhidenumberfalse%
+ \f@x@l@cksR%
+ \else%
+ \affixline@numR%
+ \fi%
\xifinlist{\the\l@dpscR}{\eled@sectionsR@@}%
{\add@insertsR\affixside@noteR}%
{\print@lineR}%
}%
- \add@penaltiesR
- \global\advance\@donereallinesR\@ne
- \global\advance\@donetotallinesR\@ne
-\else
- \setbox\l@drightbox \hb@xt@ \Rcolwidth{\hspace*{\Rcolwidth}}
- \global\advance\@donetotallinesR\@ne
-\fi
+ \add@penaltiesR%
+ \global\advance\@donereallinesR\@ne%
+ \global\advance\@donetotallinesR\@ne%
+\else%
+ \setbox\l@drightbox \hb@xt@ \Rcolwidth{\hspace*{\Rcolwidth}}%
+ \global\advance\@donetotallinesR\@ne%
+\fi%
\ledRcol@false%
}
@@ -1118,7 +1134,7 @@
\l@dld@ta %space kept for backward compatibility
\add@insertsR\affixside@noteR%
\l@dlsn@te %space kept for backward compatibility
- \correcthangingR\ledllfill\hb@xt@ \wd\one@lineR{%
+ \ledllfill\hb@xt@ \Rcolwidth{%
\do@insidelineRhook%
\new@lineR%
\inserthangingsymbolR%
@@ -1126,7 +1142,7 @@
\luatextextdir\l@luatextextdir@R%
\fi%
\l@dunhbox@line{\one@lineR}}\ledrlfill\l@drd@ta%
- \l@drsn@te
+ \l@drsn@te%
}
\def\print@eledsectionR{%
@@ -1161,37 +1177,39 @@
\global\advance\absline@numR \@ne
\do@actionsR
\do@ballastR
-\ifledgroupnotesR@\else\ifnumberline
- \ifsublines@
- \ifnum\sub@lockR<\tw@
- \global\advance\subline@numR \@ne
- \fi
- \else
- \ifnum\@lockR<\tw@
- \global\advance\line@numR \@ne
- \global\subline@numR \z@
- \fi
+ \ifledgroupnotesR@\else
+ \ifnumberline
+ \ifsublines@
+ \ifnum\sub@lockR<\tw@
+ \global\advance\subline@numR \@ne
+ \fi
+ \else
+ \ifnum\@lockR<\tw@
+ \global\advance\line@numR \@ne
+ \global\subline@numR \z@
+ \fi
+ \fi
+ \fi
\fi
-\fi
-\fi
}
\newcommand*{\getline@numL}{%
- \global\advance\absline@num \@ne
+ \global\advance\absline@num \@ne
\do@actions
\do@ballast
-\ifledgroupnotesL@\else\ifnumberline
- \ifsublines@
- \ifnum\sub@lock<\tw@
- \global\advance\subline@num \@ne
- \fi
- \else
- \ifnum\@lock<\tw@
- \global\advance\line@num \@ne
- \global\subline@num \z@
- \fi
+ \ifledgroupnotesL@\else
+ \ifnumberline
+ \ifsublines@
+ \ifnum\sub@lock<\tw@
+ \global\advance\subline@num \@ne
+ \fi
+ \else
+ \ifnum\@lock<\tw@
+ \global\advance\line@num \@ne
+ \global\subline@num \z@
+ \fi
+ \fi
+ \fi
\fi
-\fi
-\fi
}
\newcommand*{\do@ballastR}{\global\ballast@count=\z@
@@ -1203,6 +1221,8 @@
\fi
\fi
\endgroup}
+
+\newif\ifl@dskipversenumberR
\newcommand*{\do@actions@fixedcodeR}{%
\ifcase\@l@dtempcnta%
\or% % 1001
@@ -1211,7 +1231,7 @@
\global\sublines@false
\or% % 1003
\global\@lockR=\@ne
- \or% % 1004
+ \or% % 1004%
\ifnum\@lockR=\tw@
\global\@lockR=\thr@@
\else
@@ -1227,9 +1247,14 @@
\fi
\or% % 1007
\l@dskipnumbertrue
- \else
+ \or% % 1008
+ \l@dskipversenumberRtrue%
+ \or% % 1009
+ \l@dhidenumbertrue%
+ \else%
\led@warn@BadAction
- \fi}
+ \fi%
+}
\newcommand*{\do@actionsR}{%
\global\let\do@actions@nextR=\relax
@@ -1349,21 +1374,23 @@
\ch@ck@l@ckR
\fi
\ifnum\@l@dtempcnta=\@l@dtempcntb
- \if@twocolumn
- \if@firstcolumn
- \gdef\l@dld@ta{\llap{{\leftlinenumR}}}%
- \else
- \gdef\l@drd@ta{\rlap{{\rightlinenumR}}}%
- \fi
- \else
- \@l@dtempcntb=\line@marginR
- \ifnum\@l@dtempcntb>\@ne
- \advance\@l@dtempcntb by\page@numR
- \fi
- \ifodd\@l@dtempcntb
- \gdef\l@drd@ta{\rlap{{\rightlinenumR}}}%
+ \ifl@dskipversenumberR\else
+ \if@twocolumn
+ \if@firstcolumn
+ \gdef\l@dld@ta{\llap{{\leftlinenumR}}}%
+ \else
+ \gdef\l@drd@ta{\rlap{{\rightlinenumR}}}%
+ \fi
\else
- \gdef\l@dld@ta{\llap{{\leftlinenumR}}}%
+ \@l@dtempcntb=\line@marginR
+ \ifnum\@l@dtempcntb>\@ne
+ \advance\@l@dtempcntb by\page@numR
+ \fi
+ \ifodd\@l@dtempcntb
+ \gdef\l@drd@ta{\rlap{{\rightlinenumR}}}%
+ \else
+ \gdef\l@dld@ta{\llap{{\leftlinenumR}}}%
+ \fi
\fi
\fi
\fi
@@ -1691,36 +1718,24 @@
\newif\ifinserthangingsymbolR
\newcommand{\inserthangingsymbolL}{%
-\ifinserthangingsymbol%
+ \ifinserthangingsymbol%
\ifinstanzaL%
+ \hskip \@ifundefined{sza@0@}{0}{\expandafter%
+ \noexpand\csname sza@0@\endcsname}\stanzaindentbase%
\hangingsymbol%
\fi%
-\fi}
+ \fi%
+}%
\newcommand{\inserthangingsymbolR}{%
-\ifinserthangingsymbolR%
+ \ifinserthangingsymbolR%
\ifinstanzaR%
+ \hskip \@ifundefined{sza@0@}{0}{\expandafter%
+ \noexpand\csname sza@0@\endcsname}\stanzaindentbase%
\hangingsymbol%
\fi%
-\fi}
-\newcommand{\correcthangingL}{%
-\ifl@dpaging\else%
- \ifinstanzaL%
- \ifinserthangingsymbol%
- \hskip \@ifundefined{sza@0@}{0}{\expandafter%
- \noexpand\csname sza@0@\endcsname}\stanzaindentbase%
- \fi%
- \fi%
-\fi}
+ \fi%
+}%
-\newcommand{\correcthangingR}{%
-\ifl@dpaging\else%
- \ifinstanzaR%
- \ifinserthangingsymbolR%
- \hskip \@ifundefined{sza@0@}{0}{\expandafter%
- \noexpand\csname sza@0@\endcsname}\stanzaindentbase%
- \fi%
- \fi%
-\fi}
\chardef\next=\catcode`\&
\catcode`\&=\active
@@ -2122,67 +2137,67 @@
\newcommand*{\Pages}{%
\l@dprintingpagestrue%
\eledsection@correcting@skip=-2\baselineskip% line correcting for section titles.
- \parledgroup@notespacing@set@correction
- \typeout{}
- \typeout{*************************** PAGES ***************************}
- \ifnum\l@dnumpstartsL=\l@dnumpstartsR\else
+ \parledgroup@notespacing@set@correction%
+ \typeout{}%
+ \typeout{*************************** PAGES ***************************}%
+ \ifnum\l@dnumpstartsL=\l@dnumpstartsR\else%
\led@err@BadLeftRightPstarts{\the\l@dnumpstartsL}{\the\l@dnumpstartsR}%
- \fi
+ \fi%
\setlength{\Lcolwidth}{\textwidth}%
\setlength{\Rcolwidth}{\textwidth}%
- \cleartol@devenpage
- \begingroup
- \l@dzeropenalties
- \endgraf\global\num@lines=\prevgraf
- \global\num@linesR=\prevgraf
- \global\par@line=\z@
- \global\par@lineR=\z@
- \global\l@dpscL=\z@
- \global\l@dpscR=\z@
- \writtenlinesLfalse
- \writtenlinesRfalse
+ \cleartol@devenpage%
+ \begingroup%
+ \l@dzeropenalties%
+ \endgraf\global\num@lines=\prevgraf%
+ \global\num@linesR=\prevgraf%
+ \global\par@line=\z@%
+ \global\par@lineR=\z@%
+ \global\l@dpscL=\z@%
+ \global\l@dpscR=\z@%
+ \writtenlinesLfalse%
+ \writtenlinesRfalse%
\let\print@Xnotes\print@Xnotes@forpages%
\let\print@notesX\print@notesX@forpages%
- \check@pstarts
- \loop\if@pstarts
- \global\advance\l@dpscL \@ne
- \global\advance\l@dpscR \@ne
- \getlinesfromparlistL
- \getlinesfromparlistR
+ \check@pstarts%
+ \loop\if@pstarts%
+ \global\advance\l@dpscL \@ne%
+ \global\advance\l@dpscR \@ne%
+ \getlinesfromparlistL%
+ \getlinesfromparlistR%
\l@dcalc@maxoftwo{\@cs@linesinparL}{\@cs@linesinparR}%
{\usenamecount{l@dmaxlinesinpar\the\l@dpscL}}%
- \check@pstarts
- \repeat
- \global\l@dpscL=\z@
- \global\l@dpscR=\z@
- \getlinesfrompagelistL
- \getlinesfrompagelistR
+ \check@pstarts%
+ \repeat%
+ \global\l@dpscL=\z@%
+ \global\l@dpscR=\z@%
+ \getlinesfrompagelistL%
+ \getlinesfrompagelistR%
\l@dcalc@minoftwo{\@cs@linesonpageL}{\@cs@linesonpageR}%
{\l@dminpagelines}%
- \check@pstarts
- \if@pstarts
- \global\advance\l@dpscL \@ne
- \global\advance\l@dpscR \@ne
+ \check@pstarts%
+ \if@pstarts%
+ \global\advance\l@dpscL \@ne%
+ \global\advance\l@dpscR \@ne%
\restore@pstartL@pc%
\restore@pstartR@pc%
- \global\@donereallinesL=\z@
- \global\@donetotallinesL=\z@
- \global\@donereallinesR=\z@
- \global\@donetotallinesR=\z@
- \checkraw@text
-{ \loop\ifaraw@text
- \checkpageL
+ \global\@donereallinesL=\z@%
+ \global\@donetotallinesL=\z@%
+ \global\@donereallinesR=\z@%
+ \global\@donetotallinesR=\z@%
+ \checkraw@text%
+{ \loop\ifaraw@text%
+ \checkpageL%
\l@duselanguage{\theledlanguageL}%
{ \loop\ifl@dsamepage%
- \ifdefstring{\@eledsectnotoc}{L}{\ledsectnotoc}{}
+ \ifdefstring{\@eledsectnotoc}{L}{\ledsectnotoc}{}%
\csuse{before@pstartL@\the\l@dpscL}%
- \global\csundef{before@pstartL@\the\l@dpscL}
- \do@lineL
+ \global\csundef{before@pstartL@\the\l@dpscL}%
+ \do@lineL%
\xifinlist{\the\l@dpscL}{\eled@sections@@}
{\print@eledsectionL}%
{}%
- \advance\numpagelinesL \@ne
- \ifshiftedpstarts
+ \advance\numpagelinesL \@ne%
+ \ifshiftedpstarts%
\ifdim\ht\l@dleftbox>0pt\hb@xt@%
\hsize{\ledstrutL\unhbox\l@dleftbox}%
\else%
@@ -2193,37 +2208,38 @@
\else%
\parledgroup@correction@notespacing{L}
\hb@xt@ \hsize{\ledstrutL\unhbox\l@dleftbox}%
- \fi
+ \fi%
\get@nextboxL%
+ \global\l@dskipversenumberfalse%
\ifprint@last@after@pendL%
\csuse{after@pendL@\the\l@dpscL}%
\global\csundef{after@pendL@\the\l@dpscL}%
\fi%
\checkpageL%
- \checkverseL
- \checkpbL
- \repeat
- \ifl@dpagefull
+ \checkverseL%
+ \checkpbL%
+ \repeat%
+ \ifl@dpagefull%
\@writelinesonpageL{\the\numpagelinesL}%
- \else
+ \else%
\@writelinesonpageL{1000}%
- \fi
- \numpagelinesL \z@
- \parledgroup@correction@notespacing@init
+ \fi%
+ \numpagelinesL \z@%
+ \parledgroup@correction@notespacing@init%
\clearl@dleftpage }%
\checkpageR%
\l@duselanguage{\theledlanguageR}%
{ \loop\ifl@dsamepage%
- \initnumbering@sectcountR
- \ifdefstring{\@eledsectnotoc}{R}{\ledsectnotoc}{}
+ \initnumbering@sectcountR%
+ \ifdefstring{\@eledsectnotoc}{R}{\ledsectnotoc}{}%
\csuse{before@pstartR@\the\l@dpscR}%
- \global\csundef{before@pstartR@\the\l@dpscR}
- \do@lineR
- \xifinlist{\the\l@dpscR}{\eled@sectionsR@@}
+ \global\csundef{before@pstartR@\the\l@dpscR}%
+ \do@lineR%
+ \xifinlist{\the\l@dpscR}{\eled@sectionsR@@}%
{\print@eledsectionR}%
{}%
- \advance\numpagelinesR \@ne
- \ifshiftedpstarts
+ \advance\numpagelinesR \@ne%
+ \ifshiftedpstarts%
\ifdim\ht\l@drightbox>0pt\hb@xt@%
\hsize{\ledstrutR\unhbox\l@drightbox}%
\else%
@@ -2232,50 +2248,57 @@
\global\pagetotal=\dimen0%
\fi%
\else%
- \parledgroup@correction@notespacing{R}
+ \parledgroup@correction@notespacing{R}%
\hb@xt@ \hsize{\ledstrutR\unhbox\l@drightbox}%
- \fi
+ \fi%
\get@nextboxR%
+ \global\l@dskipversenumberRfalse%
\ifprint@last@after@pendR%
\csuse{after@pendR@\the\l@dpscR}%
\global\csundef{after@pendR@\the\l@dpscR}%
\fi%
\checkpageR%
- \checkverseR
- \checkpbR
- \repeat
- \ifl@dpagefull
+ \checkverseR%
+ \checkpbR%
+ \repeat%
+ \ifl@dpagefull%
\@writelinesonpageR{\the\numpagelinesR}%
- \else
+ \else%
\@writelinesonpageR{1000}%
- \fi
- \numpagelinesR=\z@
- \parledgroup@correction@notespacing@init
- \clearl@drightpage}
- \checkraw@text
- \ifaraw@text
- \getlinesfrompagelistL
- \getlinesfrompagelistR
+ \fi%
+ \numpagelinesR=\z@%
+ \parledgroup@correction@notespacing@init%
+ \clearl@drightpage}%
+ \checkraw@text%
+ \ifaraw@text%
+ \getlinesfrompagelistL%
+ \getlinesfrompagelistR%
\l@dcalc@minoftwo{\@cs@linesonpageL}{\@cs@linesonpageR}%
{\l@dminpagelines}%
- \fi
- \repeat}
- \fi
- \flush@notes
- \flush@notesR
- \endgroup
- \global\l@dpscL=\z@
- \global\l@dpscR=\z@
- \global\l@dnumpstartsL=\z@
- \global\l@dnumpstartsR=\z@
- \global\instanzaLfalse
- \global\instanzaRfalse
+ \fi%
+ \repeat}%
+ \fi%
+ \flush@notes%
+ \flush@notesR%
+ \endgroup%
+ \global\l@dpscL=\z@%
+ \global\l@dpscR=\z@%
+ \global\l@dnumpstartsL=\z@%
+ \global\l@dnumpstartsR=\z@%
+ \global\instanzaLfalse%
+ \global\instanzaRfalse%
\l@dprintingpagesfalse%
\finish@Pages@notes%Needed to prevent final notes overlap line number
\ignorespaces}
\newcommand{\finish@Pages@notes}{%
\def\do##1{%
+ \ifnocritical@%
+ \newbox\csuse{##1footins}
+ \fi
+ \ifnofamiliar@%
+ \newbox\csuse{footins##1}
+ \fi
\ifvoid\csuse{##1footins}%
\ifvoid\csuse{footins##1}\else%
\newpage\null%
@@ -2539,6 +2562,13 @@
\fi
\fi}
+\pretocmd{\chapter}{%
+ \ifl@dprintingpages%
+ \vbox{}%
+ \fi%
+ }%
+ {}%
+ {}%
\newcommand{\eledsectnotoc}[1]{\xdef\@eledsectnotoc{#1}}
\eledsectnotoc{R}
\newcommand{\eledsectmark}[1]{\xdef\@eledsectmark{#1}}