summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-08-24 00:06:44 +0000
committerKarl Berry <karl@freefriends.org>2011-08-24 00:06:44 +0000
commit5ee555b18c5d1b514f56d1583cb66ad016b9c0c6 (patch)
treeee83baebb31e59cc7cdaa4dd2e513dace9ad6264
parentbe52161d176ec8b83077d89810997f588fa7e62e (diff)
ledmac (ledpar) update (23aug11)
git-svn-id: svn://tug.org/texlive/trunk@23663 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/Makefile3
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/README5
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/djd17nov.tex1
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/djdpoems.tex1
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/ledarab.pdfbin412113 -> 414188 bytes
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/ledmac.pdfbin1000651 -> 1019757 bytes
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/ledmixed.tex12
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/ledpar.pdfbin555112 -> 576251 bytes
-rw-r--r--Master/texmf-dist/doc/latex/ledmac/villon.tex1
-rw-r--r--Master/texmf-dist/source/latex/ledmac/ledarab.dtx2
-rw-r--r--Master/texmf-dist/source/latex/ledmac/ledmac.dtx392
-rw-r--r--Master/texmf-dist/source/latex/ledmac/ledpar.dtx671
-rw-r--r--Master/texmf-dist/tex/latex/ledmac/ledmac.sty224
-rw-r--r--Master/texmf-dist/tex/latex/ledmac/ledpar.sty561
-rw-r--r--Master/texmf-dist/tex/latex/ledmac/ledparpatch.sty470
-rw-r--r--Master/texmf-dist/tex/latex/ledmac/ledpatch.sty316
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds1
17 files changed, 939 insertions, 1721 deletions
diff --git a/Master/texmf-dist/doc/latex/ledmac/Makefile b/Master/texmf-dist/doc/latex/ledmac/Makefile
index deaab006d5b..f24cfe06f86 100644
--- a/Master/texmf-dist/doc/latex/ledmac/Makefile
+++ b/Master/texmf-dist/doc/latex/ledmac/Makefile
@@ -4,7 +4,6 @@ PACKAGE = *.dtx \
ledarab.pdf \
ledpar.pdf \
*eps \
- *patch.sty \
README \
Makefile
@@ -35,5 +34,5 @@ dist: $(PACKAGE)
clean:
- @$(RM) *.aux *.log *.out *.toc *tex *.pdf ledmac.sty ledarab.sty ledpar.sty afoot.sty *ind *ilg *lof *idx
+ @$(RM) *.aux *.log *.out *.toc *tex *.pdf ledmac.sty ledarab.sty ledpar.sty afoot.sty *ind *ilg *lof *idx *glo *gls ../ledmac.zip
diff --git a/Master/texmf-dist/doc/latex/ledmac/README b/Master/texmf-dist/doc/latex/ledmac/README
index c00cb4fd1f5..761a4055508 100644
--- a/Master/texmf-dist/doc/latex/ledmac/README
+++ b/Master/texmf-dist/doc/latex/ledmac/README
@@ -15,7 +15,7 @@ Please use the ledpar issues. https://github.com/maieul/ledmac/issues
--------------------------------------------------------------------
- Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
+ Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net, Maïeul Rouquette (news maintainer since juin 2011)
Copyright 2003 --- 2005 Peter R. Wilson
This work may be distributed and/or modified under the
@@ -56,9 +56,6 @@ Please use the ledpar issues. https://github.com/maieul/ledmac/issues
ledarab.pdf (20- pages)
egarab.eps
egarabpar.eps
- ledpatch.sty
- ledparpatch.sty
- ledarabpatch.sty
and the derived files
ledmac.sty,
ledeasy.tex,
diff --git a/Master/texmf-dist/doc/latex/ledmac/djd17nov.tex b/Master/texmf-dist/doc/latex/ledmac/djd17nov.tex
index 7c19c953e2e..28407448dd2 100644
--- a/Master/texmf-dist/doc/latex/ledmac/djd17nov.tex
+++ b/Master/texmf-dist/doc/latex/ledmac/djd17nov.tex
@@ -23,7 +23,6 @@
%% This work consists of the files listed in the README file.
%%
-
%%% This is djd17nov.tex, a sample critical text edition
%%% written in LaTeX2e with the ledmac and ledpar packages.
%%% (c) 2003--2004 by Dr. Dirk-Jan Dekker,
diff --git a/Master/texmf-dist/doc/latex/ledmac/djdpoems.tex b/Master/texmf-dist/doc/latex/ledmac/djdpoems.tex
index 4bf2eed7cae..9ffdeea31f8 100644
--- a/Master/texmf-dist/doc/latex/ledmac/djdpoems.tex
+++ b/Master/texmf-dist/doc/latex/ledmac/djdpoems.tex
@@ -23,7 +23,6 @@
%% This work consists of the files listed in the README file.
%%
-
%%% djdpoems.tex example parallel verses on facing pages
\documentclass{article}
\usepackage{ledmac,ledpar}
diff --git a/Master/texmf-dist/doc/latex/ledmac/ledarab.pdf b/Master/texmf-dist/doc/latex/ledmac/ledarab.pdf
index 2648afd757d..f0c5e8ae3d9 100644
--- a/Master/texmf-dist/doc/latex/ledmac/ledarab.pdf
+++ b/Master/texmf-dist/doc/latex/ledmac/ledarab.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/latex/ledmac/ledmac.pdf b/Master/texmf-dist/doc/latex/ledmac/ledmac.pdf
index 4cb2e64c5d4..af70a76d222 100644
--- a/Master/texmf-dist/doc/latex/ledmac/ledmac.pdf
+++ b/Master/texmf-dist/doc/latex/ledmac/ledmac.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/latex/ledmac/ledmixed.tex b/Master/texmf-dist/doc/latex/ledmac/ledmixed.tex
index 822c5a85524..a076808fab3 100644
--- a/Master/texmf-dist/doc/latex/ledmac/ledmixed.tex
+++ b/Master/texmf-dist/doc/latex/ledmac/ledmixed.tex
@@ -68,18 +68,6 @@
\newcommand{\vgfootnote}[2]{\def\rd@ta{#2}}
- \renewcommand{\do@line}{%
- {\vbadness=10000 \splittopskip=0pt
- \gdef\rd@ta{}% for right margin paragraph->always a few characters
- \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
- \hbox to\hsize{\affixline@num\add@inserts\hbox to\z@% inserts added here so
- {\hss\box\lp@rbox\kern\linenumsep}% that margin pars are
- \hfil\hbox to\wd\one@line{\new@line\unhbox\one@line% included.
- \hbox to\z@{\kern\linenumsep\notenumfont\rd@ta\hss}}}%
- \add@penalties} % margin pars also included in line format
-
\renewcommand{\affixline@num}{%
\ifsublines@
\@l@dtempcntb=\subline@num
diff --git a/Master/texmf-dist/doc/latex/ledmac/ledpar.pdf b/Master/texmf-dist/doc/latex/ledmac/ledpar.pdf
index 7c2a1348872..56529c6fe8e 100644
--- a/Master/texmf-dist/doc/latex/ledmac/ledpar.pdf
+++ b/Master/texmf-dist/doc/latex/ledmac/ledpar.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/latex/ledmac/villon.tex b/Master/texmf-dist/doc/latex/ledmac/villon.tex
index 511100fc07e..fabbb45adfa 100644
--- a/Master/texmf-dist/doc/latex/ledmac/villon.tex
+++ b/Master/texmf-dist/doc/latex/ledmac/villon.tex
@@ -23,7 +23,6 @@
%% This work consists of the files listed in the README file.
%%
-
%%% villon.tex Example parallel columns
\documentclass{article}
\addtolength{\textheight}{-10\baselineskip}
diff --git a/Master/texmf-dist/source/latex/ledmac/ledarab.dtx b/Master/texmf-dist/source/latex/ledmac/ledarab.dtx
index eaed5ddd2fa..6d45e1fc1a2 100644
--- a/Master/texmf-dist/source/latex/ledmac/ledarab.dtx
+++ b/Master/texmf-dist/source/latex/ledmac/ledarab.dtx
@@ -193,6 +193,8 @@
% provides an interface between \Larabtex{} and \Ledmac{} (also \Ledpar)
% for arabic text
% in critical editions.
+%
+% Please, for all bug's report, open a ticket on \url{https://github.com/maieul/ledmac/issues/}
% \end{abstract}
%
% \tableofcontents
diff --git a/Master/texmf-dist/source/latex/ledmac/ledmac.dtx b/Master/texmf-dist/source/latex/ledmac/ledmac.dtx
index 8b7dba93418..91e4f8aa08b 100644
--- a/Master/texmf-dist/source/latex/ledmac/ledmac.dtx
+++ b/Master/texmf-dist/source/latex/ledmac/ledmac.dtx
@@ -50,7 +50,7 @@
%
% \fi
%
-% \CheckSum{9041}
+% \CheckSum{9034}
%
% \makeatletter
% \newcommand*{\DescribeIt}{\leavevmode\@bsphack\begingroup\MakePrivateLetters
@@ -128,7 +128,10 @@
% \def\fileversion{v0.6} \def\filedate{2004/12/10}
% \def\fileversion{v0.7} \def\filedate{2005/03/24}
% \def\fileversion{v0.8} \def\filedate{2011/07/11}
-%\def\fileversion{v0.8.1} \def\filedate{2011/07/14}
+% \def\fileversion{v0.8.1} \def\filedate{2011/07/14}
+% \def\fileversion{v0.9} \def\filedate{2011/08/03}
+% \def\fileversion{v0.9.1} \def\filedate{2011/08/08}
+% \def\fileversion{v0.10} \def\filedate{2011/08/22}
% \changes{v0.1}{2003/03/25}{First public release}
% \changes{v0.2}{2003/08/16}{Added tabmac code, and extended indexing}
% \changes{v0.2.1}{2003/09/13}{Bug fixes and match with mempatch v1.8}
@@ -151,6 +154,9 @@
% \changes{v0.7}{2011/06/17}{Ma\"ieul Rouquette new maintainer}
% \changes{v0.8}{2011/07/11}{Bug on endnotes fixed : in a // text, every endnotes can be at the end (!)}
% \changes{v0.8.1}{2011/07/14}{Bug on \cs{edtext} ; \cs{critex} ; \cs{lemma} fixed : we can now us non switching commands, like \cs{textit}}
+% \changes{v0.9}{2011/08/03}{No more ledpatch. All patches are now in the main file.}
+% \changes{v0.9.1}{2011/08/08}{Fix some bug's linked with the integration of ledpatch on the main file.}
+% \changes{v0.10}{2011/08/22}{Corrections about \cs{section} and other titles in numbered sections}
% \hyphenation{man-u-script man-u-scripts}
%
% \newcommand{\Lpack}[1]{\textsf{#1}}
@@ -259,6 +265,8 @@
% Other LaTeX packages for critical editions include EDNOTES, and
% \Lpack{poemscol} for poetical works.
% \end{PW}
+%
+% Please, for all bug's report, open a ticket on \url{https://github.com/maieul/ledmac/issues/}
% \end{abstract}
%
% \tableofcontents
@@ -2932,7 +2940,7 @@
% \begin{macrocode}
%<*code>
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{ledmac}[2005/03/24 v0.7 LaTeX port of EDMAC]
+\ProvidesPackage{ledmac}[2011/08/22 v0.10 LaTeX port of EDMAC]
% \end{macrocode}
%
@@ -4556,6 +4564,7 @@
%
% \begin{macro}{\lock@on}
% \begin{macro}{\do@lockon}
+% \begin{macro}{\do@lockonL}
% \cs{lock@on}
% adds an entry to the action-code list to turn line number
% locking on. The current setting of the sub-lineation flag tells us
@@ -4570,52 +4579,62 @@
\newcommand*{\lock@on}{\futurelet\next\do@lockon}
\newcommand*{\do@lockon}{%
\ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
+ \global\let\lock@off=\skip@lockoff
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@list
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@list
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
+ \do@lockonL
+ \fi}
+\newcommand*{\do@lockonL}{%
+ \xright@appenditem{\the\absline@num}\to\actionlines@list
+ \ifsublines@
+ \xright@appenditem{-1005}\to\actions@list
+ \ifnum\sub@lock=\z@
+ \sub@lock \@ne
+ \else
+ \ifnum\sub@lock=\thr@@
+ \sub@lock \@ne
+ \fi
+ \fi
+ \else
+ \xright@appenditem{-1003}\to\actions@list
+ \ifnum\@lock=\z@
+ \@lock \@ne
+ \else
+ \ifnum\@lock=\thr@@
+ \@lock \@ne
+ \fi
+ \fi
\fi}
+
% \end{macrocode}
% \end{macro}
% \end{macro}
+% \end{macro}
%
% \begin{macro}{\lock@off}
% \begin{macro}{\do@lockoff}
+% \begin{macro}{\do@lockoffL}
% \begin{macro}{\skip@lockoff}
% \cs{lock@off} adds an entry to the action-code list
% to turn line number locking off.
% \begin{macrocode}
-\newcommand*{\do@lockoff}{%
+\newcommand*{\do@lockoffL}{%
\xright@appenditem{\the\absline@num}\to\actionlines@list
\ifsublines@
\xright@appenditem{-1006}\to\actions@list
\ifnum\sub@lock=\tw@
- \sub@lock \thr@@
+ \sub@lock \thr@@
\else
- \sub@lock \z@
+ \sub@lock \z@
\fi
\else
\xright@appenditem{-1004}\to\actions@list
\ifnum\@lock=\tw@
- \@lock \thr@@
+ \@lock \thr@@
\else
- \@lock \z@
+ \@lock \z@
\fi
\fi}
+\newcommand*{\do@lockoff}{\do@lockoffL}
\newcommand*{\skip@lockoff}{\global\let\lock@off=\do@lockoff}
\global\let\lock@off=\do@lockoff
@@ -4623,6 +4642,7 @@
% \end{macro}
% \end{macro}
% \end{macro}
+% \end{macro}
%
% \begin{PW}
% \begin{macro}{\n@num}
@@ -5512,7 +5532,14 @@
% is happening within a group; definitions must be global if you want
% them to survive past the end of the paragraph.
% \begin{macrocode}
-\newcommand*{\pstart}{\ifnumbering \else
+\newcommand*{\pstart}{
+ \if@nobreak
+\let\@oldnobreak\@nobreaktrue
+\else
+\let\@oldnobreak\@nobreakfalse
+\fi
+\@nobreaktrue
+ \ifnumbering \else
\led@err@PstartNotNumbered
\beginnumbering
\fi
@@ -5560,7 +5587,8 @@
% \begin{macrocode}
\flush@notes
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
% \end{macrocode}
% \end{macro}
@@ -5639,139 +5667,30 @@
% \subsection{Processing one line}
%
% \begin{macro}{\do@line}
+% \begin{macro}{\l@dunhbox@line}
% The \cs{do@line} macro is called by \cs{pend} to
% do all the processing for a single line of text.
% \begin{macrocode}
-\newcommand*{\do@line}{%
-% \end{macrocode}
-%
-% First, pull
-% one line off the top of \cs{raw@text}, which contains the remaining
-% unprocessed lines of the paragraph. \cs{vbadness} must be cranked up to
-% suppress \verb"Underfull vbox" errors from
-% \cs{vsplit}; \cs{splittopskip} will be inserted at the top of
-% \cs{one@line}, so we zero it. (This skip will appear in the final
-% vertical list, just before every \cs{baselineskip}.)
-% \begin{macrocode}
- {\vbadness=10000 \splittopskip=0pt
-% \end{macrocode}
-% \begin{PW}
-% Provide a hook for potential extra settings.
-% \begin{macrocode}
- \do@linehook
-% \end{macrocode}
-% Null the \cs{...d@ta}, which may later hold line numbers, here.
-% They will get defined within \cs{affixline@num}. Similarly for
-% \cs{l@dcsnotetext} for the text of a sidenote.
-% \begin{macrocode}
- \l@demptyd@ta
-% \end{macrocode}
-% \end{PW}
-%
-% \begin{macrocode}
- \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
-% \end{macrocode}
-%
-% \cs{one@line} comes out of \cs{vsplit} as a \verb"vbox";
-% we now convert it to an \verb"hbox".
-%
-% This operation breaks if there's an insert connected to the
-% \phantomsection\label{doline} line. In that case, the content of the \verb"vbox"
-% \cs{one@line} before this operation is not just an \verb"hbox": it's
-% an \verb"hbox" followed by an insert. After the \cs{unvbox}, the
-% last thing on the vertical list is not the \verb"hbox" but the
-% insert. The result is that our line heads prematurely onto the
-% vertical list---with incorrect interline spacing, because there's
-% still a level of boxing that should be undone---and \cs{one@line}
-% is the void box, because the last thing on the vertical list
-% wasn't a box. The subsequent code consequently prints a blank
-% line.
-%
-% All this is why insertions need to be kept out of the paragraph
-% until this point; our footnote macros add all insertions to list
-% macros, and the \cs{add@inserts} macro below puts them onto the
-% vertical list at the proper time.
-% \begin{macrocode}
- \unvbox\one@line \global\setbox\one@line=\lastbox
-% \end{macrocode}
-%
-% Calculate the line and page number for this line.
-% \begin{macrocode}
- \getline@num
-% \end{macrocode}
-%
-% Now we'll add the line to the vertical list, with a line
-% number attached if necessary.
-%
-% The \verb"\hfil\hbox to \wd\one@line" is necessary to position a
-% hangindented line correctly: without it, \cs{one@line} gets
-% stretched out to \cs{hsize} in width and the indentation
-% disappears. This is because hanging indentation is done by
-% setting a nonzero `shift' value for the \verb"hbox" that
-% contains the line within the \verb"vbox", and that shift vanishes, like
-% the penalties, when we slice up the paragraph; one can examine
-% the \cs{ht} or \cs{wd} of a box within \TeX{}, but it provides no
-% way of examining the \cs{shift}, though it would be a trivial
-% modification of the \TeX{} program to add that function.
-% (\cs{parshape}\phantomsection\label{parshape}
-% also works by setting a nonzero shift, but this fix isn't good
-% enough there, because the total width of the lines is also varied
-% in that case; our algorithm will push all the lines of text over
-% to the right margin.)
-%
-% We put the \cs{new@line} start-of-line marker in the output list at
-% this point too: putting it within the \cs{hbox} here ensures that
-% it comes before any of the text of the line in the vertical list,
-% but cannot be broken away from it at a page break.
-%
-% \begin{PW}
-% For LaTeX I think that \cs{linewidth} is more appropriate
-% than \cs{hsize} here.
-%
-% It turns out (e.g., in the \verb?ledgroupsized? environment) to be useful
-% to have controllable fills at each end of the line, not just the
-% original \verb?\hfil\hbox?. Another change from the original, namely
-% adding the inserts earlier at the start of the line, lets
-% us have sidenotes in numbered text, and also regular and familiar
-% footnotes.
-% \changes{v0.5}{2004/04/03}{Changed \cs{do@line} to enable sidenotes and
-% regular footnoting}
-% \changes{v0.5.1}{2004/04/10}{Changed \cs{do@line} to restore correct line
-% numbering}
-% \changes{v0.5.1}{2004/04/10}{Added code to \cs{do@line} to handle
-% \cs{ledsidenote}s}
-%
-% \cs{affixline@num} puts the line numbers into \cs{l@dld@ta} (left)
-% and \cs{l@drd@ta} (right), so call it before starting to process the line.
-% \begin{macrocode}
+ \newcommand*{\l@dunhbox@line}[1]{\unhbox #1}
+ \newcommand*{\do@line}{%
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@linehook
+\l@demptyd@ta
+ \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
+ \unvbox\one@line \global\setbox\one@line=\lastbox
+ \getline@num
\affixline@num
-% \end{macrocode}
-% Now stick everything into a set of boxes. After calling \cs{add@inserts}
-% to grab any inserts for the line call \cs{affixside@note} to grab
-% the texts for any moveable sidenotes going into the margin(s).
-% \begin{macrocode}
- \hb@xt@ \linewidth{%
- \l@dld@ta\add@inserts\affixside@note
- \l@dlsn@te% left side note
- {\ledllfill
- \hb@xt@ \wd\one@line{\new@line\unhbox\one@line}%
- \ledrlfill\l@drd@ta%
- \l@drsn@te}% right side note
- }%
-% \end{macrocode}
-%
-% Originally the footnotes and insertions for this line were pulled out of the
-% \cs{inserts@list} list macro at this point and attached, but this has
-% now been done earlier.
-% \end{PW}
-%
-% Penalties get stripped off by this slicing process; the following
-% macro puts them back in as the last step.
-% \begin{macrocode}
- \add@penalties}
+ \hb@xt@ \linewidth{\l@dld@ta\add@inserts\affixside@note
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
+ }}
+ \add@penalties}
% \end{macrocode}
% \end{macro}
+% \end{macro}
%
% \begin{PW}
% \begin{macro}{\do@linehook}
@@ -5990,62 +5909,33 @@
% \changes{v0.7}{2005/02/24}{Added \cs{do@actions@fixedcode}}
% \begin{macrocode}
\newcommand*{\do@actions@fixedcode}{%
- \ifcase\@l@dtempcnta% %1000
-% \end{macrocode}
-%
-% Commands that turn sub-lineation on and off.
-% \begin{macrocode}
- \or% % 1001
- \global\sublines@true
- \or% % 1002
- \global\sublines@false
-% \end{macrocode}
-%
-% Line locking. We ignore these indications when they don't appear
-% at the right times: a start-lock should appear only when locking
-% is entirely off, and an end-lock should only appear when locking is
-% in the `middle'.
-% \begin{macrocode}
- \or% % 1003
- \ifcase\@lock
- \global\@lock=\@ne
- \else
- \global\@lock=\z@
- \fi
- \or% % 1004
- \ifnum\@lock=\tw@
- \global\@lock=\thr@@
- \else
- \global\@lock=\z@
- \fi
-% \end{macrocode}
-%
-% Sub-line locking. Same comments as for line locking.
-% \begin{macrocode}
- \or% % 1005
- \ifcase\sub@lock
- \global\sub@lock=\@ne
- \else
- \global\sub@lock=\z@
- \fi
- \or% % 1006
- \ifnum\sub@lock=\tw@
- \global\sub@lock=\thr@@
- \else
- \global\sub@lock=\z@
- \fi
-% \end{macrocode}
-% Number skipping.
-% \begin{macrocode}
- \or% % 1007
- \l@dskipnumbertrue
-% \end{macrocode}
-%
-% If we get here, some unknown action code has been encountered.
-% \begin{macrocode}
- \else
- \led@warn@BadAction
- \fi}
+ \ifcase\@l@dtempcnta
+ \or% % 1001
+ \global\sublines@true
+ \or% % 1002
+ \global\sublines@false
+ \or% % 1003
+ \global\@lock=\@ne
+ \or% % 1004
+ \ifnum\@lock=\tw@
+ \global\@lock=\thr@@
+ \else
+ \global\@lock=\z@
+ \fi
+ \or% % 1005
+ \global\sub@lock=\@ne
+ \or% % 1006
+ \ifnum\sub@lock=\tw@
+ \global\sub@lock=\thr@@
+ \else
+ \global\sub@lock=\z@
+ \fi
+ \or% % 1007
+ \l@dskipnumbertrue
+ \else
+ \led@warn@BadAction
+ \fi}
+
% \end{macrocode}
% \end{macro}
@@ -9120,21 +9010,23 @@
% The `footnotes' for left, right, and moveable sidenotes. The whole
% scheme is reminiscent of the critical footnotes code.
% \begin{macrocode}
+\newif\ifrightnoteup
+ \rightnoteuptrue
\newcommand*{\l@dlsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
\newcommand*{\l@drsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
\newcommand*{\l@dcsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
@@ -9149,9 +9041,9 @@
% \begin{macro}{\vl@dcsnote}
% Put the left/right text into boxes, but just save the moveable text.
% \begin{macrocode}
-\newcommand*{\vl@dlsnote}[1]{\setl@dlp@rbox#1}
-\newcommand*{\vl@drsnote}[1]{\setl@drp@rbox#1}
-\newcommand*{\vl@dcsnote}[1]{\savel@dcsnote#1}
+\newcommand*{\vl@dlsnote}[1]{\setl@dlp@rbox{#1}}
+\newcommand*{\vl@drsnote}[1]{\setl@drp@rbox{#1}}
+\newcommand*{\vl@dcsnote}[1]{\gdef\l@dcsnotetext{#1}}
% \end{macrocode}
% \end{macro}
@@ -9166,14 +9058,25 @@
% It is these boxes that finally
% get displayed in the margins.
% \begin{macrocode}
-\newcommand*{\setl@dlp@rbox}[3]{%
+\newcommand*{\setl@dlp@rbox}[1]{%
{\parindent\z@\hsize=\ledlsnotewidth\ledlsnotefontsetup
- \global\setbox\l@dlp@rbox=\vbox to\z@{\vss#3}}}% aligns on bottom line
+ \global\setbox\l@dlp@rbox
+ \ifleftnoteup
+ =\vbox to\z@{\vss #1}%
+ \else
+ =\vbox to 0.70\baselineskip{\strut#1\vss}%
+ \fi}}
%% \global\setbox\l@dlp@rbox=\vbox to\z@{#3\vss}}}% aligns on top line
-\newcommand*{\setl@drp@rbox}[3]{%
+\newcommand*{\setl@drp@rbox}[1]{%
{\parindent\z@\hsize=\ledrsnotewidth\ledrsnotefontsetup
- \global\setbox\l@drp@rbox=\vbox to\z@{\vss#3}}}
-
+ \global\setbox\l@drp@rbox
+ \ifrightnoteup
+ =\vbox to\z@{\vss#1}%
+ \else
+ =\vbox to0.7\baselineskip{\strut#1\vss}%
+ \fi}}
+\newif\ifleftnoteup
+ \leftnoteuptrue
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -9199,9 +9102,9 @@
\ifx\@templ@d\l@dcsnotetext \else
\if@twocolumn
\if@firstcolumn
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\else
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\fi
\else
\@l@dtempcntb=\sidenote@margin
@@ -9209,9 +9112,9 @@
\advance\@l@dtempcntb by\page@num
\fi
\ifodd\@l@dtempcntb
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\else
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\fi
\fi
\fi}
@@ -10068,7 +9971,7 @@
% \changes{v0.4.1}{2003/03/06}{Added minpage setup to \cs{addfootinsX}}
% \begin{macrocode}
\newcommand*{\addfootinsX}[1]{%
- \footnormalX{#1}
+ \footnormalX{#1}%
\g@addto@macro{\doxtrafeeti}{%
\setbox\@outputbox \vbox{%
\unvbox\@outputbox
@@ -10078,11 +9981,11 @@
\ifvoid\@nameuse{footins#1}\else
\insert\@nameuse{footins#1}{\unvbox\@nameuse{footins#1}}\fi}%
\g@addto@macro{\l@dfambeginmini}{%
- \expandafter\let\csname footnote#1\endcsname=\@nameuse{mpfootnote#1}}
+ \expandafter\expandafter\expandafter\let\expandafter\expandafter
+ \csname footnote#1\endcsname \csname mpfootnote#1\endcsname}%
\g@addto@macro{\l@dfamendmini}{%
- \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1{#1}}}%
+ \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1}{#1}\fi}%
}
-
% \end{macrocode}
% \end{macro}
%
@@ -11226,16 +11129,17 @@
% \begin{macro}{\l@dcheckcols}
% Check that the number of columns is consistent. (was |\tabfehlermeldung|)
% \begin{macrocode}
-\newcommand{\l@dcheckcols}{%
- \ifnum\l@dcolcount=1\relax%
+\newcommand*{\l@dcheckcols}{%
+ \ifnum\l@dcolcount=1\relax
\else
- \ifnum\l@dampcount=1\relax%
+ \ifnum\l@dampcount=1\relax
\else
- \ifnum\l@dcolcount=\l@dampcount\relax%
- \led@err@UnequalColumns
- \fi%
+ \ifnum\l@dcolcount=\l@dampcount\relax
+ \else
+ \l@d@err@UnequalColumns
+ \fi
\fi
- \l@dampcount=\l@dcolcount%
+ \l@dampcount=\l@dcolcount
\fi}
% \end{macrocode}
@@ -12223,14 +12127,8 @@
%
% \section{The End}\label{end}
%
-% This is the end of the package code. But before we finish, enable
-% a patch file (if there is one) to be read.
-%
-% \begin{macrocode}
-\InputIfFileExists{ledpatch.sty}
%</code>
-% \end{macrocode}
%
% \newpage
% \appendix
@@ -12972,18 +12870,8 @@ in section~\ref{subsec}.
\newcommand{\vffootnote}[2]{\setlp@rbox#2}
\newcommand{\vgfootnote}[2]{\def\rd@ta{#2}}
+
- \renewcommand{\do@line}{%
- {\vbadness=10000 \splittopskip=0pt
- \gdef\rd@ta{}% for right margin paragraph->always a few characters
- \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
- \hbox to\hsize{\affixline@num\add@inserts\hbox to\z@% inserts added here so
- {\hss\box\lp@rbox\kern\linenumsep}% that margin pars are
- \hfil\hbox to\wd\one@line{\new@line\unhbox\one@line% included.
- \hbox to\z@{\kern\linenumsep\notenumfont\rd@ta\hss}}}%
- \add@penalties} % margin pars also included in line format
\renewcommand{\affixline@num}{%
\ifsublines@
diff --git a/Master/texmf-dist/source/latex/ledmac/ledpar.dtx b/Master/texmf-dist/source/latex/ledmac/ledpar.dtx
index 0b12bf384d8..8b03e4eaa6e 100644
--- a/Master/texmf-dist/source/latex/ledmac/ledpar.dtx
+++ b/Master/texmf-dist/source/latex/ledmac/ledpar.dtx
@@ -50,7 +50,7 @@
%
% \fi
%
-% \CheckSum{4247}
+% \CheckSum{4361}
%
% \makeatletter
% \newcommand*{\DescribeIt}{\leavevmode\@bsphack\begingroup\MakePrivateLetters
@@ -122,6 +122,9 @@
% \def\fileversion{v0.3a} \def\filedate{2005/03/30}
% \def\fileversion{v0.3b} \def\filedate{2005/04/08}
% \def\fileversion{v0.3c} \def\filedate{2011/06/16}
+% \def\fileversion{v0.4} \def\filedate{2011/08/03}
+% \def\fileversion{v0.5} \def\filedate{2011/08/21}
+% \def\fileversion{v0.6} \def\filedate{2011/08/22}
%
% \changes{v0.1}{2004/12/10}{First public release}
% \changes{v0.2}{2005/01/01}{Fix babel problems}
@@ -129,7 +132,9 @@
% \changes{v0.3a}{2005/03/30}{Minor \cs{linenummargin} fix}
% \changes{v0.3b}{2005/04/08}{Improved parallel page balancing}
% \changes{v0.3c}{2011/06/16}{Compatibilty with Polyglossia}
-
+% \changes{v0.4}{2011/08/03}{No more ledparpatch. All patches are now in the main file.}
+% \changes{v0.5}{2011/08/21}{Corrections about \cs{section} and other titles in numbered sections}
+% \changes{v0.6}{2011/08/22}{Be able to us \cs{chapter} in parallel pages.}
% \hyphenation{man-u-script man-u-scripts}
%
% \newcommand{\Lpack}[1]{\textsf{#1}}
@@ -183,6 +188,8 @@
% editions. The \Ledpar{} package is an extension to \Ledmac{}
% which enables texts and their critical apparatus to be typeset in
% parallel, either in two columns or on pairs of facing pages.
+%
+% Please, for all bug's report, open a ticket on \url{https://github.com/maieul/ledmac/issues/}
% \end{abstract}
%
% \tableofcontents
@@ -679,7 +686,7 @@
% \begin{macrocode}
%<*code>
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{ledpar}[2011/06/16 v0.3c ledmac extension for parallel texts]
+\ProvidesPackage{ledpar}[2011/08/22 v0.6 ledmac extension for parallel texts]
% \end{macrocode}
%
@@ -831,12 +838,11 @@
\global\advance\section@numR \@ne
\global\absline@numR \z@
\global\line@numR \z@
- \global\subline@numR \z@
- \global\@lock \z@
- \global\sub@lock \z@
+ \global\@lockR \z@
+ \global\sub@lockR \z@
\global\sublines@false
- \global\let\next@page@numR=\relax
- \global\let\sub@change=\relax
+ \global\let\next@page@numR\relax
+ \global\let\sub@change\relax
\message{Section \the\section@numR R }%
\line@list@stuffR{\jobname.\extensionchars\the\section@numR R}%
\l@dend@stuff}
@@ -1295,81 +1301,68 @@
%
% The macros with \verb"action" in their names contain all the code
% that modifies the action-code list.
-%
+% \begin{macro}{\@l@regR}
% \begin{macro}{\@l}
% \cs{@l} does everything related to the start of a
% new line of numbered text. Exactly what it does depends
% on whether right text is being processed.
%
% \begin{macrocode}
-\renewcommand{\@l}[2]{%
- \fix@page{#1}%
- \ifledRcol
- \ifx\l@dchset@num\relax \else
- \advance\absline@numR \@ne
- \set@line@action
- \let\l@dchset@num=\relax
- \advance\absline@numR \m@ne
- \advance\line@numR \m@ne% % do we need this??
- \fi
+\newcommand{\@l@regR}{%
+ \ifx\l@dchset@num\relax \else
\advance\absline@numR \@ne
-% \end{macrocode}
-% Increment the absolute line-number, and perform
-% deferred actions relating to page starts and sub-lines.
-% \begin{macrocode}
- \ifx\next@page@numR\relax \else
- \page@action
- \let\next@page@numR=\relax
- \fi
- \ifx\sub@change\relax \else
- \ifnum\sub@change>\z@
- \sublines@true
- \else
- \sublines@false
- \fi
- \sub@action
- \let\sub@change=\relax
+ \set@line@action
+ \let\l@dchset@num\relax
+ \advance\absline@numR \m@ne
+ \advance\line@numR \m@ne% % do we need this?
+ \fi
+ \advance\absline@numR \@ne
+ \ifx\next@page@numR\relax \else
+ \page@action
+ \let\next@page@numR\relax
+ \fi
+ \ifx\sub@change\relax \else
+ \ifnum\sub@change>\z@
+ \sublines@true
+ \else
+ \sublines@false
\fi
-% \end{macrocode}
-%
-% Fix the lock counters, if necessary. A value of $1$ is advanced to
-% $2$; $3$ advances to $0$; other values are unchanged.
-% \begin{macrocode}
- \ifcase\@lock
- \or
- \@lock \tw@
- \or \or
- \@lock \z@
- \fi
- \ifcase\sub@lock
- \or
- \sub@lock \tw@
- \or \or
- \sub@lock \z@
- \fi
-% \end{macrocode}
-%
-% Now advance the visible line number, unless it's been locked.
-% \begin{macrocode}
+ \sub@action
+ \let\sub@change\relax
+ \fi
+ \ifcase\@lockR
+ \or
+ \@lockR \tw@
+ \or\or
+ \@lockR \z@
+ \fi
+ \ifcase\sub@lockR
+ \or
+ \sub@lockR \tw@
+ \or\or
+ \sub@lockR \z@
+ \fi
\ifsublines@
- \ifnum\sub@lock<\tw@
+ \ifnum\sub@lockR<\tw@
\advance\subline@numR \@ne
\fi
\else
- \ifnum\@lock<\tw@
+ \ifnum\@lockR<\tw@
\advance\line@numR \@ne \subline@numR \z@
\fi
- \fi
+ \fi}
+
+\renewcommand*{\@l}[2]{%
+ \fix@page{#1}%
+ \ifledRcol
+ \@l@regR
\else
-% \end{macrocode}
-% And when we are not in right text
-% \begin{macrocode}
\@l@reg
\fi}
% \end{macrocode}
% \end{macro}
-%
+% \end{macro}
% \begin{macro}{\last@page@numR}
% \begin{macro}{\fix@page}
% We have to adjust \cs{fix@page} to handle parallel texts.
@@ -1564,102 +1557,91 @@
% \end{macro}
%
% \begin{macro}{\do@lockon}
+% \begin{macro}{\do@lockonR}
% \cs{lock@on}
% adds an entry to the action-code list to turn line number
% locking on. The current setting of the sub-lineation flag tells us
% whether this applies to line numbers or sub-line numbers.
% \begin{macrocode}
+\newcount\@lockR
+\newcount\sub@lockR
+
+\newcommand*{\do@lockonR}{%
+ \xright@appenditem{\the\absline@numR}\to\actionlines@listR
+ \ifsublines@
+ \xright@appenditem{-1005}\to\actions@listR
+ \ifnum\sub@lockR=\z@
+ \sub@lockR \@ne
+ \else
+ \ifnum\sub@lockR=\thr@@
+ \sub@lockR \@ne
+ \fi
+ \fi
+ \else
+ \xright@appenditem{-1003}\to\actions@listR
+ \ifnum\@lockR=\z@
+ \@lockR \@ne
+ \else
+ \ifnum\@lockR=\thr@@
+ \@lockR \@ne
+ \fi
+ \fi
+ \fi}
+
\renewcommand*{\do@lockon}{%
\ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
+ \global\let\lock@off=\skip@lockoff
\else
\ifledRcol
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@listR
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@listR
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
+ \do@lockonR
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@list
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@list
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
- \fi
+ \do@lockonL
+ \fi
\fi}
% \end{macrocode}
% \end{macro}
+% \end{macro}
%
% \begin{macro}{\lock@off}
% \begin{macro}{\do@lockoff}
+% \begin{macro}{\do@lockoffR}
% \begin{macro}{\skip@lockoff}
% \cs{lock@off} adds an entry to the action-code list
% to turn line number locking off.
% \begin{macrocode}
-\renewcommand*{\do@lockoff}{%
- \ifledRcol
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@listR
- \ifnum\sub@lock=\tw@
- \sub@lock \thr@@
- \else
- \sub@lock \z@
- \fi
+
+
+\newcommand{\do@lockoffR}{%
+ \xright@appenditem{\the\absline@numR}\to\actionlines@listR
+ \ifsublines@
+ \xright@appenditem{-1006}\to\actions@listR
+ \ifnum\sub@lockR=\tw@
+ \sub@lockR \thr@@
\else
- \xright@appenditem{-1004}\to\actions@listR
- \ifnum\@lock=\tw@
- \@lock \thr@@
- \else
- \@lock \z@
- \fi
+ \sub@lockR \z@
\fi
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@list
- \ifnum\sub@lock=\tw@
- \sub@lock \thr@@
- \else
- \sub@lock \z@
- \fi
+ \xright@appenditem{-1004}\to\actions@listR
+ \ifnum\@lockR=\tw@
+ \@lockR \thr@@
\else
- \xright@appenditem{-1004}\to\actions@list
- \ifnum\@lock=\tw@
- \@lock \thr@@
- \else
- \@lock \z@
- \fi
+ \@lockR \z@
\fi
\fi}
+
+\renewcommand*{\do@lockoff}{%
+ \ifledRcol
+ \do@lockoffR
+ \else
+ \do@lockoffL
+ \fi}
\global\let\lock@off=\do@lockoff
% \end{macrocode}
% \end{macro}
% \end{macro}
% \end{macro}
+% \end{macro}
%
% \begin{macro}{\n@num}
% This macro implements the \cs{skipnumbering} command. It uses a new
@@ -2087,6 +2069,7 @@
%
% \begin{environment}{pairs}
% \begin{environment}{pages}
+% \begin{macro}{chapterinpages}
% The \verb?pairs? environment is for parallel columns and the \verb?pages?
% environment for parallel pages.
% \begin{macrocode}
@@ -2098,9 +2081,11 @@
}
% \end{macrocode}
% The \verb?pages? environment additionally sets the `column' widths to the
-% \cs{textwidth} (as known at the time the package is called).
+% \cs{textwidth} (as known at the time the package is called). As in this environnement there is two text in parallels in 2 pages, chapter have not to start in a left page. So the \cs{chapter} command is redefined to make no test about clearing page.
% \begin{macrocode}
\newenvironment{pages}{%
+ \let\oldchapter\chapter
+ \let\chapter\chapterinpages
\l@dpairingtrue
\l@dpagingtrue
\setlength{\Lcolwidth}{\textwidth}%
@@ -2108,9 +2093,15 @@
}{%
\l@dpairingfalse
\l@dpagingfalse
+ \let\chapter\oldchapter
}
+\newcommand{\chapterinpages}{\thispagestyle{plain}%
+ \global\@topnum\z@
+ \@afterindentfalse
+ \secdef\@chapter\@schapter}
% \end{macrocode}
+% \end{macro}
% \end{environment}
% \end{environment}
%
@@ -2238,7 +2229,14 @@
% among other things because of potential changes in the linewidth.
%
% \begin{macrocode}
-\newcommand*{\pstartL}{\ifnumbering \else
+\newcommand*{\pstartL}{
+\if@nobreak
+ \let\@oldnobreak\@nobreaktrue
+\else
+ \let\@oldnobreak\@nobreakfalse
+\fi
+ \@nobreaktrue
+ \ifnumbering \else
\led@err@PstartNotNumbered
\beginnumbering
\fi
@@ -2272,7 +2270,14 @@
% \end{macrocode}
%
% \begin{macrocode}
-\newcommand*{\pstartR}{\ifnumberingR \else
+\newcommand*{\pstartR}{
+\if@nobreak
+ \let\@oldnobreak\@nobreaktrue
+\else
+ \let\@oldnobreak\@nobreakfalse
+\fi
+ \@nobreaktrue
+ \ifnumberingR \else
\led@err@PstartNotNumbered
\beginnumberingR
\fi
@@ -2325,7 +2330,8 @@
% End the group that was begun in the \cs{pstart}.
% \begin{macrocode}
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
% \end{macrocode}
% \end{macro}
@@ -2344,7 +2350,8 @@
\endgraf\global\num@linesR=\prevgraf\egroup
\global\par@lineR=0
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
% \end{macrocode}
% \end{macro}
@@ -2410,78 +2417,33 @@
% \begin{macrocode}
\newcommand*{\do@lineL}{%
\advance\countLline \@ne
-% \end{macrocode}
-% If the current \cs{l@dLcolrawbox} box is not empty it contains
-% the remaining unprocessed lines of the chunk, so
-% pull one line off the top.
-% \cs{vbadness} must be cranked up to
-% suppress \verb"Underfull vbox" errors from
-% \cs{vsplit}; \cs{splittopskip} will be inserted at the top of
-% \cs{one@line}, so we zero it. (This skip will appear in the final
-% vertical list, just before every \cs{baselineskip}.)
-% \begin{macrocode}
\ifvbox\namebox{l@dLcolrawbox\the\l@dpscL}%
- {\vbadness=10000 \splittopskip=0pt
-% \end{macrocode}
-% Insert the \cs{do@lineLhook} and
-% null the \cs{...d@ta}, which may later hold line numbers, here.
-% They will get defined within \cs{affixline@num}. Similarly for
-% \cs{l@dcsnotetext} for the text of a sidenote.
-% \begin{macrocode}
- \do@lineLhook
- \l@demptyd@ta
-% \end{macrocode}
-%
-% \begin{macrocode}
- \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}
- to\baselineskip}%
-% \end{macrocode}
-%
-% \cs{one@line} comes out of \cs{vsplit} as a \verb"vbox";
-% we now convert it to an \verb"hbox".
-% \begin{macrocode}
- \unvbox\one@line \global\setbox\one@line=\lastbox
-% \end{macrocode}
-%
-% Calculate the line and page number for this line.
-% \begin{macrocode}
- \getline@num
-% \end{macrocode}
-% Now we'll put the line into a box of the apropriate width, with a line
-% number attached if necessary.
-% \begin{macrocode}
- \setbox\l@dleftbox
- \hb@xt@ \Lcolwidth{%
-% \end{macrocode}
-% Add line numbers, inserts, sidenotes, etc.
-% \begin{macrocode}
- \affixline@num
- \l@dld@ta
- \add@inserts
- \affixside@note
-% \end{macrocode}
-% Now stick everything into a set of boxes.
-% \begin{macrocode}
- \l@dlsn@te% left side note
- {\ledllfill\hb@xt@ \wd\one@line{\new@line\unhbox\one@line}\ledrlfill\l@drd@ta
- \l@drsn@te% right side note
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@lineLhook
+ \l@demptyd@ta
+ \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}
+ to\baselineskip}%
+ \unvbox\one@line \global\setbox\one@line=\lastbox
+ \getline@num
+ \setbox\l@dleftbox
+ \hb@xt@ \Lcolwidth{%
+ \affixline@num
+ \l@dld@ta
+ \add@inserts
+ \affixside@note
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
}}%
-% \end{macrocode}
-% Penalties get stripped off by this slicing process; the following
-% macro puts them back in as the last stepandthen we increment the
-% number of `real' (text),and total lines done.
-% \begin{macrocode}
- \add@penaltiesL
- \global\advance\@donereallinesL\@ne
- \global\advance\@donetotallinesL\@ne
-% \end{macrocode}
-% Otherwise, the curent \cs{l@dLcolrawbox} has been emptied, so just
-% generate an empty box and increment the total lines.
-% \begin{macrocode}
- \else
- \setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
- \global\advance\@donetotallinesL\@ne
- \fi}
+ \add@penaltiesL
+ \global\advance\@donereallinesL\@ne
+ \global\advance\@donetotallinesL\@ne
+\else
+ \setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
+ \global\advance\@donetotallinesL\@ne
+\fi}
+
% \end{macrocode}
% \end{macro}
@@ -2506,30 +2468,32 @@
\newcommand*{\do@lineR}{%
\advance\countRline \@ne
\ifvbox\namebox{l@dRcolrawbox\the\l@dpscR}%
- {\vbadness=10000 \splittopskip=0pt
- \do@lineRhook
- \l@demptyd@ta
- \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}
- to\baselineskip}%
- \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
- \getline@numR
- \setbox\l@drightbox
- \hb@xt@ \Rcolwidth{%
- \affixline@numR
- \l@dld@ta
- \add@insertsR
- \affixside@noteR
- \l@dlsn@te% left side note
- {\ledllfill\hb@xt@ \wd\one@lineR{\new@lineR\unhbox\one@lineR}\ledrlfill\l@drd@ta
- \l@drsn@te% right side note
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@lineRhook
+ \l@demptyd@ta
+ \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}
+ to\baselineskip}%
+ \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
+ \getline@numR
+ \setbox\l@drightbox
+ \hb@xt@ \Rcolwidth{%
+ \affixline@numR
+ \l@dld@ta
+ \add@insertsR
+ \affixside@noteR
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@lineR{\new@lineR\l@dunhbox@line{\one@lineR}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
}}%
- \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}
+
% \end{macrocode}
% \end{macro}
@@ -2547,16 +2511,17 @@
\do@actionsR
\do@ballastR
\ifsublines@
- \ifnum\sub@lock<\tw@
- \global\advance\subline@numR \@ne
- \fi
+ \ifnum\sub@lockR<\tw@
+ \global\advance\subline@numR \@ne
+ \fi
\else
- \ifnum\@lock<\tw@
- \global\advance\line@numR \@ne
- \global\subline@numR=\z@
- \fi
+ \ifnum\@lockR<\tw@
+ \global\advance\line@numR \@ne
+ \global\subline@numR \z@
+ \fi
\fi}
+
% \end{macrocode}
% \end{macro}
%
@@ -2580,6 +2545,7 @@
%
%
% \begin{macro}{\do@actionsR}
+% \begin{macro}{\do@actions@fixedcodeR}
% \begin{macro}{\do@actions@nextR}
%
% The \cs{do@actionsR} macro
@@ -2590,36 +2556,65 @@
% \cs{do@actions@nextR} for this.
% \changes{v0.3}{2005/02/24}{Used \cs{do@actions@fixedcode} in \cs{do@actionsR}}
% \begin{macrocode}
+\newcommand*{\do@actions@fixedcodeR}{%
+ \ifcase\@l@dtempcnta%
+ \or% % 1001
+ \global\sublines@true
+ \or% % 1002
+ \global\sublines@false
+ \or% % 1003
+ \global\@lockR=\@ne
+ \or% % 1004
+ \ifnum\@lockR=\tw@
+ \global\@lockR=\thr@@
+ \else
+ \global\@lockR=\z@
+ \fi
+ \or% % 1005
+ \global\sub@lockR=\@ne
+ \or% % 1006
+ \ifnum\sub@lockR=\tw@
+ \global\sub@lockR=\thr@@
+ \else
+ \global\sub@lockR=\z@
+ \fi
+ \or% % 1007
+ \l@dskipnumbertrue
+ \else
+ \led@warn@BadAction
+ \fi}
+
+
\newcommand*{\do@actionsR}{%
\global\let\do@actions@nextR=\relax
\@l@dtempcntb=\absline@numR
\ifnum\@l@dtempcntb<\next@actionlineR\else
- \ifnum\next@actionR>-1001
- \global\page@numR=\next@actionR
- \ifbypage@R
- \global\line@numR=\z@ \global\subline@numR=\z@
- \fi
+ \ifnum\next@actionR>-1001\relax
+ \global\page@numR=\next@actionR
+ \ifbypage@R
+ \global\line@numR \z@ \global\subline@numR \z@
+ \fi
\else
- \ifnum\next@actionR<-4999
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -5001
- \ifsublines@
- \global\subline@numR=\@l@dtempcnta
- \else
- \global\line@numR=\@l@dtempcnta
- \fi
- \else
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -1000
- \do@actions@fixedcode
- \fi
+ \ifnum\next@actionR<-4999\relax % 9/05 added relax here
+ \@l@dtempcnta=-\next@actionR
+ \advance\@l@dtempcnta by -5001\relax
+ \ifsublines@
+ \global\subline@numR=\@l@dtempcnta
+ \else
+ \global\line@numR=\@l@dtempcnta
+ \fi
+ \else
+ \@l@dtempcnta=-\next@actionR
+ \advance\@l@dtempcnta by -1000\relax
+ \do@actions@fixedcodeR
+ \fi
\fi
\ifx\actionlines@listR\empty
- \gdef\next@actionlineR{1000000}%
+ \gdef\next@actionlineR{1000000}%
\else
- \gl@p\actionlines@listR\to\next@actionlineR
- \gl@p\actions@listR\to\next@actionR
- \global\let\do@actions@nextR=\do@actionsR
+ \gl@p\actionlines@listR\to\next@actionlineR
+ \gl@p\actions@listR\to\next@actionR
+ \global\let\do@actions@nextR=\do@actionsR
\fi
\fi
\do@actions@nextR}
@@ -2627,79 +2622,130 @@
% \end{macrocode}
% \end{macro}
% \end{macro}
+% \end{macro}
%
% \subsection{Line number printing}
%
-%
+% \begin{macro}{\l@dcalcnum}
+% \begin{macro}{\ch@cksub@l@ckR}
+% \begin{macro}{\ch@ck@l@ckR}
+% \begin{macro}{\f@x@l@cksR}
% \begin{macro}{\affixline@numR}
% \cs{affixline@numR} is the right text version of the
% \cs{affixline@num} macro.
% \changes{v0.3}{2005/02/24}{Changed \cs{affixline@numR} to match new ledmac}
% \begin{macrocode}
+
+\providecommand*{\l@dcalcnum}[3]{%
+ \ifnum #1 > #2\relax
+ \@l@dtempcnta = #1\relax
+ \advance\@l@dtempcnta by -#2\relax
+ \divide\@l@dtempcnta by #3\relax
+ \multiply\@l@dtempcnta by #3\relax
+ \advance\@l@dtempcnta by #2\relax
+ \else
+ \@l@dtempcnta=#2\relax
+ \fi}
+
+\newcommand*{\ch@cksub@l@ckR}{%
+ \ifcase\sub@lockR
+ \or
+ \ifnum\sublock@disp=\@ne
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\sublock@disp=\tw@
+ \else
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\sublock@disp=\z@
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \fi}
+
+\newcommand*{\ch@ck@l@ckR}{%
+ \ifcase\@lockR
+ \or
+ \ifnum\lock@disp=\@ne
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\lock@disp=\tw@
+ \else
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\lock@disp=\z@
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \fi}
+
+\newcommand*{\f@x@l@cksR}{%
+ \ifcase\@lockR
+ \or
+ \global\@lockR \tw@
+ \or \or
+ \global\@lockR \z@
+ \fi
+ \ifcase\sub@lockR
+ \or
+ \global\sub@lockR \tw@
+ \or \or
+ \global\sub@lockR \z@
+ \fi}
+
+
\newcommand*{\affixline@numR}{%
\ifl@dskipnumber
\global\l@dskipnumberfalse
\else
\ifsublines@
\@l@dtempcntb=\subline@numR
- \ifnum\subline@numR>\c@firstsublinenumR
- \@l@dtempcnta=\subline@numR
- \advance\@l@dtempcnta by-\c@firstsublinenumR
- \divide\@l@dtempcnta by\c@sublinenumincrementR
- \multiply\@l@dtempcnta by\c@sublinenumincrementR
- \advance\@l@dtempcnta by\c@firstsublinenumR
- \else
- \@l@dtempcnta=\c@firstsublinenumR
- \fi
- \ch@cksub@l@ck
+ \l@dcalcnum{\subline@numR}{\c@firstsublinenumR}{\c@sublinenumincrementR}%
+ \ch@cksub@lockR
\else
\@l@dtempcntb=\line@numR
\ifx\linenumberlist\empty
- \ifnum\line@numR>\c@firstlinenumR
- \@l@dtempcnta=\line@numR
- \advance\@l@dtempcnta by-\c@firstlinenumR
- \divide\@l@dtempcnta by\c@linenumincrementR
- \multiply\@l@dtempcnta by\c@linenumincrementR
- \advance\@l@dtempcnta by\c@firstlinenumR
- \else
- \@l@dtempcnta=\c@firstlinenumR
- \fi
+ \l@dcalcnum{\line@numR}{\c@firstlinenumR}{\c@linenumincrementR}%
\else
\@l@dtempcnta=\line@numR
\edef\rem@inder{,\linenumberlist,\number\line@numR,}%
\edef\sc@n@list{\def\noexpand\sc@n@list
####1,\number\@l@dtempcnta,####2|{\def\noexpand\rem@inder{####2}}}%
- \sc@n@list\expandafter\sc@n@list\rem@inder|%
- \ifx\rem@inder\empty\advance\@l@dtempcnta\@ne\fi
- \fi
- \ch@ck@l@ck
+ \sc@n@list\expandafter\sc@n@list\rem@inder|%
+ \ifx\rem@inder\empty\advance\@l@dtempcnta\@ne\fi
+ \fi
+ \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}}}%
+ \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
- \else
-%% #1%
\fi
- \f@x@l@cks
+ \f@x@l@cksR
\fi}
% \end{macrocode}
% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
%
% \subsection{Add insertions to the vertical list}
%
@@ -3197,11 +3243,11 @@
\renewcommand*{\l@dlsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -3209,11 +3255,11 @@
\renewcommand*{\l@drsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -3221,11 +3267,11 @@
\renewcommand*{\l@dcsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -3244,23 +3290,19 @@
\ifx\@templ@d\l@dcsnotetext \else
\if@twocolumn
\if@firstcolumn
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\else
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\fi
\else
\@l@dtempcntb=\sidenote@marginR
\ifnum\@l@dtempcntb>\@ne
- \ifl@dpaging
- \advance\@l@dtempcntb by\@ne
- \else
- \advance\@l@dtempcntb by\page@num
- \fi
+ \advance\@l@dtempcntb by\page@num
\fi
\ifodd\@l@dtempcntb
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\else
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\fi
\fi
\fi}
@@ -4393,14 +4435,9 @@
%
% \section{The End}\label{end}
%
-% This is the end of the package code. But before we finish, enable
-% a patch file (if there is one) to be read.
-%
-% \begin{macrocode}
-\InputIfFileExists{ledparpatch.sty}
+
%</code>
-% \end{macrocode}
%
% \newpage
% \appendix
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledmac.sty b/Master/texmf-dist/tex/latex/ledmac/ledmac.sty
index be073f70fc9..181f0c99acf 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}[2005/03/24 v0.7 LaTeX port of EDMAC]
+\ProvidesPackage{ledmac}[2011/08/22 v0.10 LaTeX port of EDMAC]
\newif\ifledfinal
\DeclareOption{final}{\ledfinaltrue}
@@ -508,42 +508,50 @@
\newcommand*{\lock@on}{\futurelet\next\do@lockon}
\newcommand*{\do@lockon}{%
\ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
+ \global\let\lock@off=\skip@lockoff
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@list
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@list
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
+ \do@lockonL
+ \fi}
+\newcommand*{\do@lockonL}{%
+ \xright@appenditem{\the\absline@num}\to\actionlines@list
+ \ifsublines@
+ \xright@appenditem{-1005}\to\actions@list
+ \ifnum\sub@lock=\z@
+ \sub@lock \@ne
+ \else
+ \ifnum\sub@lock=\thr@@
+ \sub@lock \@ne
+ \fi
+ \fi
+ \else
+ \xright@appenditem{-1003}\to\actions@list
+ \ifnum\@lock=\z@
+ \@lock \@ne
+ \else
+ \ifnum\@lock=\thr@@
+ \@lock \@ne
+ \fi
+ \fi
\fi}
-\newcommand*{\do@lockoff}{%
+
+\newcommand*{\do@lockoffL}{%
\xright@appenditem{\the\absline@num}\to\actionlines@list
\ifsublines@
\xright@appenditem{-1006}\to\actions@list
\ifnum\sub@lock=\tw@
- \sub@lock \thr@@
+ \sub@lock \thr@@
\else
- \sub@lock \z@
+ \sub@lock \z@
\fi
\else
\xright@appenditem{-1004}\to\actions@list
\ifnum\@lock=\tw@
- \@lock \thr@@
+ \@lock \thr@@
\else
- \@lock \z@
+ \@lock \z@
\fi
\fi}
+\newcommand*{\do@lockoff}{\do@lockoffL}
\newcommand*{\skip@lockoff}{\global\let\lock@off=\do@lockoff}
\global\let\lock@off=\do@lockoff
@@ -721,7 +729,14 @@
\newcount\num@lines
\newbox\one@line
\newcount\par@line
-\newcommand*{\pstart}{\ifnumbering \else
+\newcommand*{\pstart}{
+\if@nobreak
+\let\@oldnobreak\@nobreaktrue
+\else
+\let\@oldnobreak\@nobreakfalse
+\fi
+\@nobreaktrue
+\ifnumbering \else
\led@err@PstartNotNumbered
\beginnumbering
\fi
@@ -748,7 +763,8 @@
\repeat
\flush@notes
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
\newcommand*{\l@dzeropenalties}{%
\brokenpenalty \z@ \clubpenalty \z@
@@ -766,23 +782,22 @@
\ignorespaces}
\newcommand*{\normal@pars}{\everypar={}\let\par\endgraf}
-\newcommand*{\do@line}{%
- {\vbadness=10000 \splittopskip=0pt
- \do@linehook
- \l@demptyd@ta
- \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
+ \newcommand*{\l@dunhbox@line}[1]{\unhbox #1}
+ \newcommand*{\do@line}{%
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@linehook
+\l@demptyd@ta
+ \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
+ \unvbox\one@line \global\setbox\one@line=\lastbox
+ \getline@num
\affixline@num
- \hb@xt@ \linewidth{%
- \l@dld@ta\add@inserts\affixside@note
- \l@dlsn@te% left side note
- {\ledllfill
- \hb@xt@ \wd\one@line{\new@line\unhbox\one@line}%
- \ledrlfill\l@drd@ta%
- \l@drsn@te}% right side note
- }%
- \add@penalties}
+ \hb@xt@ \linewidth{\l@dld@ta\add@inserts\affixside@note
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
+ }}
+ \add@penalties}
\newcommand*{\do@linehook}{}
\newcommand*{\l@demptyd@ta}{%
@@ -859,40 +874,32 @@
\do@actions@next}
\newcommand*{\do@actions@fixedcode}{%
- \ifcase\@l@dtempcnta% %1000
- \or% % 1001
- \global\sublines@true
- \or% % 1002
- \global\sublines@false
- \or% % 1003
- \ifcase\@lock
- \global\@lock=\@ne
- \else
- \global\@lock=\z@
- \fi
- \or% % 1004
- \ifnum\@lock=\tw@
- \global\@lock=\thr@@
- \else
- \global\@lock=\z@
- \fi
- \or% % 1005
- \ifcase\sub@lock
- \global\sub@lock=\@ne
- \else
- \global\sub@lock=\z@
- \fi
- \or% % 1006
- \ifnum\sub@lock=\tw@
- \global\sub@lock=\thr@@
- \else
- \global\sub@lock=\z@
- \fi
- \or% % 1007
- \l@dskipnumbertrue
- \else
- \led@warn@BadAction
- \fi}
+ \ifcase\@l@dtempcnta
+ \or% % 1001
+ \global\sublines@true
+ \or% % 1002
+ \global\sublines@false
+ \or% % 1003
+ \global\@lock=\@ne
+ \or% % 1004
+ \ifnum\@lock=\tw@
+ \global\@lock=\thr@@
+ \else
+ \global\@lock=\z@
+ \fi
+ \or% % 1005
+ \global\sub@lock=\@ne
+ \or% % 1006
+ \ifnum\sub@lock=\tw@
+ \global\sub@lock=\thr@@
+ \else
+ \global\sub@lock=\z@
+ \fi
+ \or% % 1007
+ \l@dskipnumbertrue
+ \else
+ \led@warn@BadAction
+ \fi}
\newcommand*{\affixline@num}{%
\ifl@dskipnumber
@@ -1875,37 +1882,50 @@
\newcommand*{\ledrightnote}[1]{\edtext{}{\l@drsnote{#1}}}
\newcommand*{\ledsidenote}[1]{\edtext{}{\l@dcsnote{#1}}}
+\newif\ifrightnoteup
+ \rightnoteuptrue
\newcommand*{\l@dlsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
\newcommand*{\l@drsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
\newcommand*{\l@dcsnote}[1]{%
\ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi\ignorespaces}
-\newcommand*{\vl@dlsnote}[1]{\setl@dlp@rbox#1}
-\newcommand*{\vl@drsnote}[1]{\setl@drp@rbox#1}
-\newcommand*{\vl@dcsnote}[1]{\savel@dcsnote#1}
+\newcommand*{\vl@dlsnote}[1]{\setl@dlp@rbox{#1}}
+\newcommand*{\vl@drsnote}[1]{\setl@drp@rbox{#1}}
+\newcommand*{\vl@dcsnote}[1]{\gdef\l@dcsnotetext{#1}}
-\newcommand*{\setl@dlp@rbox}[3]{%
+\newcommand*{\setl@dlp@rbox}[1]{%
{\parindent\z@\hsize=\ledlsnotewidth\ledlsnotefontsetup
- \global\setbox\l@dlp@rbox=\vbox to\z@{\vss#3}}}% aligns on bottom line
+ \global\setbox\l@dlp@rbox
+ \ifleftnoteup
+ =\vbox to\z@{\vss #1}%
+ \else
+ =\vbox to 0.70\baselineskip{\strut#1\vss}%
+ \fi}}
%% \global\setbox\l@dlp@rbox=\vbox to\z@{#3\vss}}}% aligns on top line
-\newcommand*{\setl@drp@rbox}[3]{%
+\newcommand*{\setl@drp@rbox}[1]{%
{\parindent\z@\hsize=\ledrsnotewidth\ledrsnotefontsetup
- \global\setbox\l@drp@rbox=\vbox to\z@{\vss#3}}}
-
+ \global\setbox\l@drp@rbox
+ \ifrightnoteup
+ =\vbox to\z@{\vss#1}%
+ \else
+ =\vbox to0.7\baselineskip{\strut#1\vss}%
+ \fi}}
+\newif\ifleftnoteup
+ \leftnoteuptrue
\newcommand*{\savel@dcsnote}[3]{%
\gdef\l@dcsnotetext{#3}}
@@ -1914,9 +1934,9 @@
\ifx\@templ@d\l@dcsnotetext \else
\if@twocolumn
\if@firstcolumn
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\else
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\fi
\else
\@l@dtempcntb=\sidenote@margin
@@ -1924,9 +1944,9 @@
\advance\@l@dtempcntb by\page@num
\fi
\ifodd\@l@dtempcntb
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\else
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\fi
\fi
\fi}
@@ -2315,7 +2335,7 @@
}
\newcommand*{\addfootinsX}[1]{%
- \footnormalX{#1}
+ \footnormalX{#1}%
\g@addto@macro{\doxtrafeeti}{%
\setbox\@outputbox \vbox{%
\unvbox\@outputbox
@@ -2325,11 +2345,11 @@
\ifvoid\@nameuse{footins#1}\else
\insert\@nameuse{footins#1}{\unvbox\@nameuse{footins#1}}\fi}%
\g@addto@macro{\l@dfambeginmini}{%
- \expandafter\let\csname footnote#1\endcsname=\@nameuse{mpfootnote#1}}
+ \expandafter\expandafter\expandafter\let\expandafter\expandafter
+ \csname footnote#1\endcsname \csname mpfootnote#1\endcsname}%
\g@addto@macro{\l@dfamendmini}{%
- \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1{#1}}}%
+ \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1}{#1}\fi}%
}
-
\newcommand*{\l@dfeetbeginmini}{\l@dedbeginmini\l@dfambeginmini}
\newcommand*{\l@dfeetendmini}{\l@dedendmini\l@dfamendmini}
@@ -2756,16 +2776,17 @@
\let\Next=\next
\newcommand{\variab}{\relax}
-\newcommand{\l@dcheckcols}{%
- \ifnum\l@dcolcount=1\relax%
+\newcommand*{\l@dcheckcols}{%
+ \ifnum\l@dcolcount=1\relax
\else
- \ifnum\l@dampcount=1\relax%
+ \ifnum\l@dampcount=1\relax
\else
- \ifnum\l@dcolcount=\l@dampcount\relax%
- \led@err@UnequalColumns
- \fi%
+ \ifnum\l@dcolcount=\l@dampcount\relax
+ \else
+ \l@d@err@UnequalColumns
+ \fi
\fi
- \l@dampcount=\l@dcolcount%
+ \l@dampcount=\l@dcolcount
\fi}
\newcommand{\l@dmodforcritext}{%
@@ -3232,7 +3253,6 @@
\usingedtext
-\InputIfFileExists{ledpatch.sty}
\endinput
%%
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledpar.sty b/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
index b5dd870e773..516f36bd844 100644
--- a/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
+++ b/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
@@ -23,9 +23,8 @@
%% This work consists of the files listed in the README file.
%%
-
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{ledpar}[2011/06/16 v0.3c ledmac extension for parallel texts]
+\ProvidesPackage{ledpar}[2011/08/22 v0.6 ledmac extension for parallel texts]
\l@dpairingfalse
\newif\ifl@dpaging
@@ -78,12 +77,11 @@
\global\advance\section@numR \@ne
\global\absline@numR \z@
\global\line@numR \z@
- \global\subline@numR \z@
- \global\@lock \z@
- \global\sub@lock \z@
+ \global\@lockR \z@
+ \global\sub@lockR \z@
\global\sublines@false
- \global\let\next@page@numR=\relax
- \global\let\sub@change=\relax
+ \global\let\next@page@numR\relax
+ \global\let\sub@change\relax
\message{Section \the\section@numR R }%
\line@list@stuffR{\jobname.\extensionchars\the\section@numR R}%
\l@dend@stuff}
@@ -270,51 +268,54 @@
\fi
\fi}
-\renewcommand{\@l}[2]{%
- \fix@page{#1}%
- \ifledRcol
- \ifx\l@dchset@num\relax \else
- \advance\absline@numR \@ne
- \set@line@action
- \let\l@dchset@num=\relax
- \advance\absline@numR \m@ne
- \advance\line@numR \m@ne% % do we need this??
- \fi
+\newcommand{\@l@regR}{%
+ \ifx\l@dchset@num\relax \else
\advance\absline@numR \@ne
- \ifx\next@page@numR\relax \else
- \page@action
- \let\next@page@numR=\relax
+ \set@line@action
+ \let\l@dchset@num\relax
+ \advance\absline@numR \m@ne
+ \advance\line@numR \m@ne% % do we need this?
+ \fi
+ \advance\absline@numR \@ne
+ \ifx\next@page@numR\relax \else
+ \page@action
+ \let\next@page@numR\relax
+ \fi
+ \ifx\sub@change\relax \else
+ \ifnum\sub@change>\z@
+ \sublines@true
+ \else
+ \sublines@false
\fi
- \ifx\sub@change\relax \else
- \ifnum\sub@change>\z@
- \sublines@true
- \else
- \sublines@false
- \fi
- \sub@action
- \let\sub@change=\relax
- \fi
- \ifcase\@lock
- \or
- \@lock \tw@
- \or \or
- \@lock \z@
- \fi
- \ifcase\sub@lock
- \or
- \sub@lock \tw@
- \or \or
- \sub@lock \z@
- \fi
+ \sub@action
+ \let\sub@change\relax
+ \fi
+ \ifcase\@lockR
+ \or
+ \@lockR \tw@
+ \or\or
+ \@lockR \z@
+ \fi
+ \ifcase\sub@lockR
+ \or
+ \sub@lockR \tw@
+ \or\or
+ \sub@lockR \z@
+ \fi
\ifsublines@
- \ifnum\sub@lock<\tw@
+ \ifnum\sub@lockR<\tw@
\advance\subline@numR \@ne
\fi
\else
- \ifnum\@lock<\tw@
+ \ifnum\@lockR<\tw@
\advance\line@numR \@ne \subline@numR \z@
\fi
- \fi
+ \fi}
+
+\renewcommand*{\@l}[2]{%
+ \fix@page{#1}%
+ \ifledRcol
+ \@l@regR
\else
\@l@reg
\fi}
@@ -451,82 +452,66 @@
\fi
\fi}
+\newcount\@lockR
+\newcount\sub@lockR
+
+\newcommand*{\do@lockonR}{%
+ \xright@appenditem{\the\absline@numR}\to\actionlines@listR
+ \ifsublines@
+ \xright@appenditem{-1005}\to\actions@listR
+ \ifnum\sub@lockR=\z@
+ \sub@lockR \@ne
+ \else
+ \ifnum\sub@lockR=\thr@@
+ \sub@lockR \@ne
+ \fi
+ \fi
+ \else
+ \xright@appenditem{-1003}\to\actions@listR
+ \ifnum\@lockR=\z@
+ \@lockR \@ne
+ \else
+ \ifnum\@lockR=\thr@@
+ \@lockR \@ne
+ \fi
+ \fi
+ \fi}
+
\renewcommand*{\do@lockon}{%
\ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
+ \global\let\lock@off=\skip@lockoff
\else
\ifledRcol
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@listR
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@listR
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
+ \do@lockonR
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@list
- \ifcase\sub@lock
- \sub@lock \@ne
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@list
- \ifcase\@lock
- \@lock \@ne
- \else
- \@lock \z@
- \fi
- \fi
+ \do@lockonL
\fi
\fi}
-\renewcommand*{\do@lockoff}{%
- \ifledRcol
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@listR
- \ifnum\sub@lock=\tw@
- \sub@lock \thr@@
- \else
- \sub@lock \z@
- \fi
+
+\newcommand{\do@lockoffR}{%
+ \xright@appenditem{\the\absline@numR}\to\actionlines@listR
+ \ifsublines@
+ \xright@appenditem{-1006}\to\actions@listR
+ \ifnum\sub@lockR=\tw@
+ \sub@lockR \thr@@
\else
- \xright@appenditem{-1004}\to\actions@listR
- \ifnum\@lock=\tw@
- \@lock \thr@@
- \else
- \@lock \z@
- \fi
+ \sub@lockR \z@
\fi
\else
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@list
- \ifnum\sub@lock=\tw@
- \sub@lock \thr@@
- \else
- \sub@lock \z@
- \fi
+ \xright@appenditem{-1004}\to\actions@listR
+ \ifnum\@lockR=\tw@
+ \@lockR \thr@@
\else
- \xright@appenditem{-1004}\to\actions@list
- \ifnum\@lock=\tw@
- \@lock \thr@@
- \else
- \@lock \z@
- \fi
+ \@lockR \z@
\fi
\fi}
+
+\renewcommand*{\do@lockoff}{%
+ \ifledRcol
+ \do@lockoffR
+ \else
+ \do@lockoffL
+ \fi}
\global\let\lock@off=\do@lockoff
\providecommand*{\n@num}{}
@@ -724,6 +709,8 @@
\l@dpairingfalse
}
\newenvironment{pages}{%
+ \let\oldchapter\chapter
+ \let\chapter\chapterinpages
\l@dpairingtrue
\l@dpagingtrue
\setlength{\Lcolwidth}{\textwidth}%
@@ -731,7 +718,12 @@
}{%
\l@dpairingfalse
\l@dpagingfalse
+ \let\chapter\oldchapter
}
+\newcommand{\chapterinpages}{\thispagestyle{plain}%
+ \global\@topnum\z@
+ \@afterindentfalse
+ \secdef\@chapter\@schapter}
\newenvironment{Leftside}{%
\ledRcolfalse
@@ -764,7 +756,14 @@
\newcount\num@linesR
\newbox\one@lineR
\newcount\par@lineR
-\newcommand*{\pstartL}{\ifnumbering \else
+\newcommand*{\pstartL}{
+\if@nobreak
+\let\@oldnobreak\@nobreaktrue
+\else
+\let\@oldnobreak\@nobreakfalse
+\fi
+\@nobreaktrue
+ \ifnumbering \else
\led@err@PstartNotNumbered
\beginnumbering
\fi
@@ -786,7 +785,14 @@
\global\setnamebox{l@dLcolrawbox\the\l@dnumpstartsL}=\vbox\bgroup%
\hsize=\Lcolwidth
\numberedpar@true}
-\newcommand*{\pstartR}{\ifnumberingR \else
+\newcommand*{\pstartR}{
+\if@nobreak
+\let\@oldnobreak\@nobreaktrue
+\else
+\let\@oldnobreak\@nobreakfalse
+\fi
+\@nobreaktrue
+ \ifnumberingR \else
\led@err@PstartNotNumbered
\beginnumberingR
\fi
@@ -818,7 +824,8 @@
\endgraf\global\num@lines=\prevgraf\egroup
\global\par@line=0
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
\newcommand*{\pendR}{\ifnumberingR \else
\led@err@PendNotNumbered
@@ -830,7 +837,8 @@
\endgraf\global\num@linesR=\prevgraf\egroup
\global\par@lineR=0
\endgroup
- \ignorespaces}
+ \ignorespaces
+ \@oldnobreak}
\newbox\l@dleftbox
\newbox\l@drightbox
@@ -848,30 +856,31 @@
\newcommand*{\do@lineL}{%
\advance\countLline \@ne
\ifvbox\namebox{l@dLcolrawbox\the\l@dpscL}%
- {\vbadness=10000 \splittopskip=0pt
- \do@lineLhook
- \l@demptyd@ta
- \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}
- to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
- \setbox\l@dleftbox
- \hb@xt@ \Lcolwidth{%
- \affixline@num
- \l@dld@ta
- \add@inserts
- \affixside@note
- \l@dlsn@te% left side note
- {\ledllfill\hb@xt@ \wd\one@line{\new@line\unhbox\one@line}\ledrlfill\l@drd@ta
- \l@drsn@te% right side note
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@lineLhook
+ \l@demptyd@ta
+ \global\setbox\one@line=\vsplit\namebox{l@dLcolrawbox\the\l@dpscL}
+ to\baselineskip}%
+ \unvbox\one@line \global\setbox\one@line=\lastbox
+ \getline@num
+ \setbox\l@dleftbox
+ \hb@xt@ \Lcolwidth{%
+ \affixline@num
+ \l@dld@ta
+ \add@inserts
+ \affixside@note
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
}}%
- \add@penaltiesL
- \global\advance\@donereallinesL\@ne
- \global\advance\@donetotallinesL\@ne
- \else
- \setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
- \global\advance\@donetotallinesL\@ne
- \fi}
+ \add@penaltiesL
+ \global\advance\@donereallinesL\@ne
+ \global\advance\@donetotallinesL\@ne
+\else
+ \setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
+ \global\advance\@donetotallinesL\@ne
+\fi}
\newcommand*{\do@lineLhook}{}
\newcommand*{\do@lineRhook}{}
@@ -879,44 +888,45 @@
\newcommand*{\do@lineR}{%
\advance\countRline \@ne
\ifvbox\namebox{l@dRcolrawbox\the\l@dpscR}%
- {\vbadness=10000 \splittopskip=0pt
- \do@lineRhook
- \l@demptyd@ta
- \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}
- to\baselineskip}%
- \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
- \getline@numR
- \setbox\l@drightbox
- \hb@xt@ \Rcolwidth{%
- \affixline@numR
- \l@dld@ta
- \add@insertsR
- \affixside@noteR
- \l@dlsn@te% left side note
- {\ledllfill\hb@xt@ \wd\one@lineR{\new@lineR\unhbox\one@lineR}\ledrlfill\l@drd@ta
- \l@drsn@te% right side note
+ {\vbadness=10000
+ \splittopskip=\z@
+ \do@lineRhook
+ \l@demptyd@ta
+ \global\setbox\one@lineR=\vsplit\namebox{l@dRcolrawbox\the\l@dpscR}
+ to\baselineskip}%
+ \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
+ \getline@numR
+ \setbox\l@drightbox
+ \hb@xt@ \Rcolwidth{%
+ \affixline@numR
+ \l@dld@ta
+ \add@insertsR
+ \affixside@noteR
+ \l@dlsn@te
+ {\ledllfill\hb@xt@ \wd\one@lineR{\new@lineR\l@dunhbox@line{\one@lineR}}\ledrlfill\l@drd@ta%
+ \l@drsn@te
}}%
- \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}
\newcommand*{\getline@numR}{%
\global\advance\absline@numR \@ne
\do@actionsR
\do@ballastR
\ifsublines@
- \ifnum\sub@lock<\tw@
- \global\advance\subline@numR \@ne
- \fi
+ \ifnum\sub@lockR<\tw@
+ \global\advance\subline@numR \@ne
+ \fi
\else
- \ifnum\@lock<\tw@
- \global\advance\line@numR \@ne
- \global\subline@numR=\z@
- \fi
+ \ifnum\@lockR<\tw@
+ \global\advance\line@numR \@ne
+ \global\subline@numR \z@
+ \fi
\fi}
\newcommand*{\do@ballastR}{\global\ballast@count=\z@
@@ -928,100 +938,170 @@
\fi
\fi
\endgroup}
+\newcommand*{\do@actions@fixedcodeR}{%
+ \ifcase\@l@dtempcnta%
+ \or% % 1001
+ \global\sublines@true
+ \or% % 1002
+ \global\sublines@false
+ \or% % 1003
+ \global\@lockR=\@ne
+ \or% % 1004
+ \ifnum\@lockR=\tw@
+ \global\@lockR=\thr@@
+ \else
+ \global\@lockR=\z@
+ \fi
+ \or% % 1005
+ \global\sub@lockR=\@ne
+ \or% % 1006
+ \ifnum\sub@lockR=\tw@
+ \global\sub@lockR=\thr@@
+ \else
+ \global\sub@lockR=\z@
+ \fi
+ \or% % 1007
+ \l@dskipnumbertrue
+ \else
+ \led@warn@BadAction
+ \fi}
+
\newcommand*{\do@actionsR}{%
\global\let\do@actions@nextR=\relax
\@l@dtempcntb=\absline@numR
\ifnum\@l@dtempcntb<\next@actionlineR\else
- \ifnum\next@actionR>-1001
- \global\page@numR=\next@actionR
- \ifbypage@R
- \global\line@numR=\z@ \global\subline@numR=\z@
- \fi
+ \ifnum\next@actionR>-1001\relax
+ \global\page@numR=\next@actionR
+ \ifbypage@R
+ \global\line@numR \z@ \global\subline@numR \z@
+ \fi
\else
- \ifnum\next@actionR<-4999
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -5001
- \ifsublines@
- \global\subline@numR=\@l@dtempcnta
- \else
- \global\line@numR=\@l@dtempcnta
- \fi
- \else
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -1000
- \do@actions@fixedcode
- \fi
+ \ifnum\next@actionR<-4999\relax % 9/05 added relax here
+ \@l@dtempcnta=-\next@actionR
+ \advance\@l@dtempcnta by -5001\relax
+ \ifsublines@
+ \global\subline@numR=\@l@dtempcnta
+ \else
+ \global\line@numR=\@l@dtempcnta
+ \fi
+ \else
+ \@l@dtempcnta=-\next@actionR
+ \advance\@l@dtempcnta by -1000\relax
+ \do@actions@fixedcodeR
+ \fi
\fi
\ifx\actionlines@listR\empty
- \gdef\next@actionlineR{1000000}%
+ \gdef\next@actionlineR{1000000}%
\else
- \gl@p\actionlines@listR\to\next@actionlineR
- \gl@p\actions@listR\to\next@actionR
- \global\let\do@actions@nextR=\do@actionsR
+ \gl@p\actionlines@listR\to\next@actionlineR
+ \gl@p\actions@listR\to\next@actionR
+ \global\let\do@actions@nextR=\do@actionsR
\fi
\fi
\do@actions@nextR}
+
+\providecommand*{\l@dcalcnum}[3]{%
+ \ifnum #1 > #2\relax
+ \@l@dtempcnta = #1\relax
+ \advance\@l@dtempcnta by -#2\relax
+ \divide\@l@dtempcnta by #3\relax
+ \multiply\@l@dtempcnta by #3\relax
+ \advance\@l@dtempcnta by #2\relax
+ \else
+ \@l@dtempcnta=#2\relax
+ \fi}
+
+\newcommand*{\ch@cksub@l@ckR}{%
+ \ifcase\sub@lockR
+ \or
+ \ifnum\sublock@disp=\@ne
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\sublock@disp=\tw@
+ \else
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\sublock@disp=\z@
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \fi}
+
+\newcommand*{\ch@ck@l@ckR}{%
+ \ifcase\@lockR
+ \or
+ \ifnum\lock@disp=\@ne
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\lock@disp=\tw@
+ \else
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \or
+ \ifnum\lock@disp=\z@
+ \@l@dtempcntb \z@ \@l@dtempcnta \@ne
+ \fi
+ \fi}
+
+\newcommand*{\f@x@l@cksR}{%
+ \ifcase\@lockR
+ \or
+ \global\@lockR \tw@
+ \or \or
+ \global\@lockR \z@
+ \fi
+ \ifcase\sub@lockR
+ \or
+ \global\sub@lockR \tw@
+ \or \or
+ \global\sub@lockR \z@
+ \fi}
+
\newcommand*{\affixline@numR}{%
\ifl@dskipnumber
\global\l@dskipnumberfalse
\else
\ifsublines@
\@l@dtempcntb=\subline@numR
- \ifnum\subline@numR>\c@firstsublinenumR
- \@l@dtempcnta=\subline@numR
- \advance\@l@dtempcnta by-\c@firstsublinenumR
- \divide\@l@dtempcnta by\c@sublinenumincrementR
- \multiply\@l@dtempcnta by\c@sublinenumincrementR
- \advance\@l@dtempcnta by\c@firstsublinenumR
- \else
- \@l@dtempcnta=\c@firstsublinenumR
- \fi
- \ch@cksub@l@ck
+ \l@dcalcnum{\subline@numR}{\c@firstsublinenumR}{\c@sublinenumincrementR}%
+ \ch@cksub@lockR
\else
\@l@dtempcntb=\line@numR
\ifx\linenumberlist\empty
- \ifnum\line@numR>\c@firstlinenumR
- \@l@dtempcnta=\line@numR
- \advance\@l@dtempcnta by-\c@firstlinenumR
- \divide\@l@dtempcnta by\c@linenumincrementR
- \multiply\@l@dtempcnta by\c@linenumincrementR
- \advance\@l@dtempcnta by\c@firstlinenumR
- \else
- \@l@dtempcnta=\c@firstlinenumR
- \fi
+ \l@dcalcnum{\line@numR}{\c@firstlinenumR}{\c@linenumincrementR}%
\else
\@l@dtempcnta=\line@numR
\edef\rem@inder{,\linenumberlist,\number\line@numR,}%
\edef\sc@n@list{\def\noexpand\sc@n@list
####1,\number\@l@dtempcnta,####2|{\def\noexpand\rem@inder{####2}}}%
- \sc@n@list\expandafter\sc@n@list\rem@inder|%
- \ifx\rem@inder\empty\advance\@l@dtempcnta\@ne\fi
- \fi
- \ch@ck@l@ck
+ \sc@n@list\expandafter\sc@n@list\rem@inder|%
+ \ifx\rem@inder\empty\advance\@l@dtempcnta\@ne\fi
+ \fi
+ \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}}}%
+ \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
- \else
-%% #1%
\fi
- \f@x@l@cks
+ \f@x@l@cksR
\fi}
\list@create{\inserts@listR}
@@ -1272,11 +1352,11 @@
\renewcommand*{\l@dlsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@dlsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -1284,11 +1364,11 @@
\renewcommand*{\l@drsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@drsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@drsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -1296,11 +1376,11 @@
\renewcommand*{\l@dcsnote}[1]{%
\ifnumberedpar@
\ifledRcol
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@listR
\global\advance\insert@countR \@ne
\else
- \xright@appenditem{\noexpand\vl@dcsnote{{\l@d@nums}{\@tag}{#1}}}%
+ \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
\to\inserts@list
\global\advance\insert@count \@ne
\fi
@@ -1311,23 +1391,19 @@
\ifx\@templ@d\l@dcsnotetext \else
\if@twocolumn
\if@firstcolumn
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\else
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\fi
\else
\@l@dtempcntb=\sidenote@marginR
\ifnum\@l@dtempcntb>\@ne
- \ifl@dpaging
- \advance\@l@dtempcntb by\@ne
- \else
- \advance\@l@dtempcntb by\page@num
- \fi
+ \advance\@l@dtempcntb by\page@num
\fi
\ifodd\@l@dtempcntb
- \setl@drp@rbox{}{}{\l@dcsnotetext}%
+ \setl@drp@rbox{\l@dcsnotetext}%
\else
- \setl@dlp@rbox{}{}{\l@dcsnotetext}%
+ \setl@dlp@rbox{\l@dcsnotetext}%
\fi
\fi
\fi}
@@ -1846,7 +1922,6 @@
\fi
\fi}
-\InputIfFileExists{ledparpatch.sty}
\endinput
%%
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledparpatch.sty b/Master/texmf-dist/tex/latex/ledmac/ledparpatch.sty
deleted file mode 100644
index a6b626c281b..00000000000
--- a/Master/texmf-dist/tex/latex/ledmac/ledparpatch.sty
+++ /dev/null
@@ -1,470 +0,0 @@
-% ledparpatch.sty
-% Copyright Peter Wilson 2004, 2005
-% herries dot press at earthlink dot net
-%
-% Patch(es) for ledpar
-%
-%
-%\ProvidesFile{ledparpatch}[2005/01/11 v0.1 patches for ledpar v0.2]
-%\ProvidesFile{ledparpatch}[2005/04/15 v0.2 patches for ledpar v0.2]
-%\ProvidesFile{ledparpatch}[2005/08/22 v0.3 patches for ledpar v0.3b]
-\ProvidesFile{ledparpatch}[2005/09/15 v0.4 patches for ledpar v0.3b]
-
-%%%%%%%%%%%%%%%%%%%%%%%%% v0.3 (& v0.4) %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-%%% sidenote extensions
-
-\renewcommand*{\l@drsnote}[1]{%
- \ifnumberedpar@
- \ifledRcol
- \xright@appenditem{\noexpand\vl@drsnote{#1}}%
- \to\inserts@listR
- \global\advance\insert@countR \@ne
- \else
- \xright@appenditem{\noexpand\vl@drsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi
- \fi\ignorespaces}
-
-\renewcommand*{\l@dlsnote}[1]{%
- \ifnumberedpar@
- \ifledRcol
- \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
- \to\inserts@listR
- \global\advance\insert@countR \@ne
- \else
- \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi
- \fi\ignorespaces}
-
-\renewcommand*{\l@dcsnote}[1]{%
- \ifnumberedpar@
- \ifledRcol
- \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
- \to\inserts@listR
- \global\advance\insert@countR \@ne
- \else
- \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi
- \fi\ignorespaces}
-
-\renewcommand*{\affixside@noteR}{%
- \gdef\@templ@d{}%
- \ifx\@templ@d\l@dcsnotetext \else
- \if@twocolumn
- \if@firstcolumn
- \setl@dlp@rbox{\l@dcsnotetext}%
- \else
- \setl@drp@rbox{\l@dcsnotetext}%
- \fi
- \else
- \@l@dtempcntb=\sidenote@marginR
- \ifnum\@l@dtempcntb>\@ne
- \advance\@l@dtempcntb by\page@num
- \fi
- \ifodd\@l@dtempcntb
- \setl@drp@rbox{\l@dcsnotetext}%
- \else
- \setl@dlp@rbox{\l@dcsnotetext}%
- \fi
- \fi
- \fi}
-
-%%% startlock/endlock fixes
-
-
-\newcount\@lockR
-\newcount\sub@lockR
-
-\newcommand*{\do@lockonR}{%
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@listR
- \ifnum\sub@lockR=\z@
- \sub@lockR \@ne
- \else
- \ifnum\sub@lockR=\thr@@
- \sub@lockR \@ne
- \fi
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@listR
- \ifnum\@lockR=\z@
- \@lockR \@ne
- \else
- \ifnum\@lockR=\thr@@
- \@lockR \@ne
- \fi
- \fi
- \fi}
-
-\renewcommand*{\do@lockon}{%
- \ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
- \else
- \ifledRcol
- \do@lockonR
- \else
- \do@lockonL
- \fi
- \fi}
-
-\newcommand{\do@lockoffR}{%
- \xright@appenditem{\the\absline@numR}\to\actionlines@listR
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@listR
- \ifnum\sub@lockR=\tw@
- \sub@lockR \thr@@
- \else
- \sub@lockR \z@
- \fi
- \else
- \xright@appenditem{-1004}\to\actions@listR
- \ifnum\@lockR=\tw@
- \@lockR \thr@@
- \else
- \@lockR \z@
- \fi
- \fi}
-
-\renewcommand*{\do@lockoff}{%
- \ifledRcol
- \do@lockoffR
- \else
- \do@lockoffL
- \fi}
-\global\let\lock@off=\do@lockoff
-
-\newcommand*{\do@actions@fixedcodeR}{%
- \ifcase\@l@dtempcnta%
- \or% % 1001
- \global\sublines@true
- \or% % 1002
- \global\sublines@false
- \or% % 1003
- \global\@lockR=\@ne
- \or% % 1004
- \ifnum\@lockR=\tw@
- \global\@lockR=\thr@@
- \else
- \global\@lockR=\z@
- \fi
- \or% % 1005
- \global\sub@lockR=\@ne
- \or% % 1006
- \ifnum\sub@lockR=\tw@
- \global\sub@lockR=\thr@@
- \else
- \global\sub@lockR=\z@
- \fi
- \or% % 1007
- \l@dskipnumbertrue
- \else
- \led@warn@BadAction
- \fi}
-
-\renewcommand*{\do@actionsR}{%
- \global\let\do@actions@nextR=\relax
- \@l@dtempcntb=\absline@numR
- \ifnum\@l@dtempcntb<\next@actionlineR\else
- \ifnum\next@actionR>-1001\relax
- \global\page@numR=\next@actionR
- \ifbypage@R
- \global\line@numR \z@ \global\subline@numR \z@
- \fi
- \else
- \ifnum\next@actionR<-4999\relax % 9/05 added relax here
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -5001\relax
- \ifsublines@
- \global\subline@numR=\@l@dtempcnta
- \else
- \global\line@numR=\@l@dtempcnta
- \fi
- \else
- \@l@dtempcnta=-\next@actionR
- \advance\@l@dtempcnta by -1000\relax
- \do@actions@fixedcodeR
- \fi
- \fi
- \ifx\actionlines@listR\empty
- \gdef\next@actionlineR{1000000}%
- \else
- \gl@p\actionlines@listR\to\next@actionlineR
- \gl@p\actions@listR\to\next@actionR
- \global\let\do@actions@nextR=\do@actionsR
- \fi
- \fi
- \do@actions@nextR}
-
-
-\newcommand{\@l@regR}{%
- \ifx\l@dchset@num\relax \else
- \advance\absline@numR \@ne
- \set@line@action
- \let\l@dchset@num\relax
- \advance\absline@numR \m@ne
- \advance\line@numR \m@ne% % do we need this?
- \fi
- \advance\absline@numR \@ne
- \ifx\next@page@numR\relax \else
- \page@action
- \let\next@page@numR\relax
- \fi
- \ifx\sub@change\relax \else
- \ifnum\sub@change>\z@
- \sublines@true
- \else
- \sublines@false
- \fi
- \sub@action
- \let\sub@change\relax
- \fi
- \ifcase\@lockR
- \or
- \@lockR \tw@
- \or\or
- \@lockR \z@
- \fi
- \ifcase\sub@lockR
- \or
- \sub@lockR \tw@
- \or\or
- \sub@lockR \z@
- \fi
- \ifsublines@
- \ifnum\sub@lockR<\tw@
- \advance\subline@numR \@ne
- \fi
- \else
- \ifnum\@lockR<\tw@
- \advance\line@numR \@ne \subline@numR \z@
- \fi
- \fi}
-
-\renewcommand*{\@l}[2]{%
- \fix@page{#1}%
- \ifledRcol
- \@l@regR
- \else
- \@l@reg
- \fi}
-
-\renewcommand*{\beginnumberingR}{%
- \ifnumberingR
- \led@err@NumberingStarted
- \endnumberingR
- \fi
- \global\l@dnumpstartsR \z@
- \global\pst@rtedRfalse
- \global\numberingRtrue
- \global\advance\section@numR \@ne
- \global\absline@numR \z@
- \global\line@numR \z@
- \global\@lockR \z@
- \global\sub@lockR \z@
- \global\sublines@false
- \global\let\next@page@numR\relax
- \global\let\sub@change\relax
- \message{Section \the\section@numR R }%
- \line@list@stuffR{\jobname.\extensionchars\the\section@numR R}%
- \l@dend@stuff}
-
-\renewcommand*{\getline@numR}{%
- \global\advance\absline@numR \@ne
- \do@actionsR
- \do@ballastR
- \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}
-
-
-\newcommand*{\ch@cksub@l@ckR}{%
- \ifcase\sub@lockR
- \or
- \ifnum\sublock@disp=\@ne
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \or
- \ifnum\sublock@disp=\tw@
- \else
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \or
- \ifnum\sublock@disp=\z@
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \fi}
-
-\newcommand*{\ch@ck@l@ckR}{%
- \ifcase\@lockR
- \or
- \ifnum\lock@disp=\@ne
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \or
- \ifnum\lock@disp=\tw@
- \else
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \or
- \ifnum\lock@disp=\z@
- \@l@dtempcntb \z@ \@l@dtempcnta \@ne
- \fi
- \fi}
-
-\newcommand*{\f@x@l@cksR}{%
- \ifcase\@lockR
- \or
- \global\@lockR \tw@
- \or \or
- \global\@lockR \z@
- \fi
- \ifcase\sub@lockR
- \or
- \global\sub@lockR \tw@
- \or \or
- \global\sub@lockR \z@
- \fi}
-
-
-%% #1 = subline@numR
-%% #2 = c@firstsublinenumR
-%% #3 = c@sublinenumincrementR
-%%%%%% v0.4 put \relax after each argument; e.g., by #3 -> by #3\relax
-\providecommand*{\l@dcalcnum}[3]{%
- \ifnum #1 > #2\relax
- \@l@dtempcnta = #1\relax
- \advance\@l@dtempcnta by -#2\relax
- \divide\@l@dtempcnta by #3\relax
- \multiply\@l@dtempcnta by #3\relax
- \advance\@l@dtempcnta by #2\relax
- \else
- \@l@dtempcnta=#2\relax
- \fi}
-
-\renewcommand*{\affixline@numR}{%
-\ifl@dskipnumber
- \global\l@dskipnumberfalse
-\else
- \ifsublines@
- \@l@dtempcntb=\subline@numR
- \l@dcalcnum{\subline@numR}{\c@firstsublinenumR}{\c@sublinenumincrementR}%
- \ch@cksub@lockR
- \else
- \@l@dtempcntb=\line@numR
- \ifx\linenumberlist\empty
- \l@dcalcnum{\line@numR}{\c@firstlinenumR}{\c@linenumincrementR}%
- \else
- \@l@dtempcnta=\line@numR
- \edef\rem@inder{,\linenumberlist,\number\line@numR,}%
- \edef\sc@n@list{\def\noexpand\sc@n@list
- ####1,\number\@l@dtempcnta,####2|{\def\noexpand\rem@inder{####2}}}%
- \sc@n@list\expandafter\sc@n@list\rem@inder|%
- \ifx\rem@inder\empty\advance\@l@dtempcnta\@ne\fi
- \fi
- \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}}}%
- \else
- \gdef\l@dld@ta{\llap{{\leftlinenumR}}}%
- \fi
- \fi
- \fi
- \f@x@l@cksR
-\fi}
-
-
-
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%% v0.2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\renewcommand*{\do@lineL}{%
- \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}
- to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
- \setbox\l@dleftbox
- \hb@xt@ \Lcolwidth{%
- \affixline@num
- \l@dld@ta
- \add@inserts
- \affixside@note
- \l@dlsn@te
- {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
- \l@drsn@te
- }}%
- \add@penaltiesL
- \global\advance\@donereallinesL\@ne
- \global\advance\@donetotallinesL\@ne
-\else
- \setbox\l@dleftbox \hb@xt@ \Lcolwidth{\hspace*{\Lcolwidth}}%
- \global\advance\@donetotallinesL\@ne
-\fi}
-
-\renewcommand*{\do@lineR}{%
- \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}
- to\baselineskip}%
- \unvbox\one@lineR \global\setbox\one@lineR=\lastbox
- \getline@numR
- \setbox\l@drightbox
- \hb@xt@ \Rcolwidth{%
- \affixline@numR
- \l@dld@ta
- \add@insertsR
- \affixside@noteR
- \l@dlsn@te
- {\ledllfill\hb@xt@ \wd\one@lineR{\new@lineR\l@dunhbox@line{\one@lineR}}\ledrlfill\l@drd@ta%
- \l@drsn@te
- }}%
- \add@penaltiesR
- \global\advance\@donereallinesR\@ne
- \global\advance\@donetotallinesR\@ne
-\else
- \setbox\l@drightbox \hb@xt@ \Rcolwidth{\hspace*{\Rcolwidth}}
- \global\advance\@donetotallinesR\@ne
-\fi}
-
-\endinput
-
-%%%%%%%%%%%%%%%%%%%% v0.1 %%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%%%%%%%%%%%%%%% v0.1 stuff now in ledpar.sty itself
-
diff --git a/Master/texmf-dist/tex/latex/ledmac/ledpatch.sty b/Master/texmf-dist/tex/latex/ledmac/ledpatch.sty
deleted file mode 100644
index d80586e7505..00000000000
--- a/Master/texmf-dist/tex/latex/ledmac/ledpatch.sty
+++ /dev/null
@@ -1,316 +0,0 @@
-% ledpatch.sty
-% Copyright Peter Wilson 2004, 2005
-% herries dot press at earthlink dot net
-%
-% Patch(es) for ledmac
-%
-%
-%%%%\ProvidesFile{ledpatch}[2004/12/18 v0.1 patches for ledmac v0.6]
-%\ProvidesFile{ledpatch}[2005/01/11 v0.2 patches for ledmac v0.6]
-%\ProvidesFile{ledpatch}[2005/03/24 v0.3 patches for ledmac v0.7]
-%\ProvidesFile{ledpatch}[2005/04/15 v0.3a patches for ledmac v0.7]
-%\ProvidesFile{ledpatch}[2005/06/02 v0.4 patches for ledmac v0.7]
-\ProvidesFile{ledpatch}[2005/08/22 v0.5 patches for ledmac v0.7]
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%% v0.5 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-%%% There was a missing \else in \l@dcheckcols just before the
-%%% error message. The symptom was reported by Tobias Verbeke.
-
-\renewcommand*{\l@dcheckcols}{%
- \ifnum\l@dcolcount=1\relax
- \else
- \ifnum\l@dampcount=1\relax
- \else
- \ifnum\l@dcolcount=\l@dampcount\relax
- \else
- \l@d@err@UnequalColumns
- \fi
- \fi
- \l@dampcount=\l@dcolcount
- \fi}
-
-%%% \startlock and \endlock did not work properly in the middle
-%%% of a line. Problem reported by Stefano Cracolic
-%%% Letting S stand for \startlock and E for \endlock and t for regular
-%%% text, numbering is per the following examples:
-%%%
-%%% 1 Sttttt 1 Sttttt 1 Sttttt 1 Sttttt
-%%% tttttt tttttt tttttt tttttt
-%%% 2 ttEStt 2 ttttES tttttE tttttt
-%%% tttttt tttttt 2 Sttttt 2 EStttt
-%%% tttttt tttttt tttttt tttttt
-%%% ttEttt ttEttt ttEttt ttEttt
-%%% 3 tttttt 3 tttttt 3 tttttt 3 tttttt
-%%% 4 tttStt 4 tttttS 4 tttStt 4 ttSEtt
-%%% tttttt tttttt tttttt 5 tttttt
-%%% tttttt tttttt tttttt 6 tttttt
-%%% ttEttt Ettttt tttttE 7 tttttt
-%%% 5 tttttt 5 tttttt 5 tttttt 8 tttttt
-
-\renewcommand*{\do@lockon}{%
- \ifx\next\lock@off
- \global\let\lock@off=\skip@lockoff
- \else
- \do@lockonL
- \fi}
-
-\newcommand*{\do@lockonL}{%
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1005}\to\actions@list
-%% \ifcase\sub@lock
-%% \sub@lock \@ne
-%% \else
-%% \sub@lock \z@
-%% \fi
- \ifnum\sub@lock=\z@
- \sub@lock \@ne
- \else
- \ifnum\sub@lock=\thr@@
- \sub@lock \@ne
- \fi
- \fi
- \else
- \xright@appenditem{-1003}\to\actions@list
-%% \ifcase\@lock
-%% \@lock \@ne
-%% \else
-%% \@lock \z@
-%% \fi
- \ifnum\@lock=\z@
- \@lock \@ne
- \else
- \ifnum\@lock=\thr@@
- \@lock \@ne
- \fi
- \fi
- \fi}
-
-\newcommand*{\do@lockoffL}{%
- \xright@appenditem{\the\absline@num}\to\actionlines@list
- \ifsublines@
- \xright@appenditem{-1006}\to\actions@list
- \ifnum\sub@lock=\tw@
- \sub@lock \thr@@
- \else
- \sub@lock \z@
- \fi
- \else
- \xright@appenditem{-1004}\to\actions@list
- \ifnum\@lock=\tw@
- \@lock \thr@@
- \else
- \@lock \z@
- \fi
- \fi}
-\renewcommand*{\do@lockoff}{\do@lockoffL}
-\global\let\lock@off=\do@lockoff
-
-\renewcommand*{\do@actions@fixedcode}{%
- \ifcase\@l@dtempcnta
- \or% % 1001
- \global\sublines@true
- \or% % 1002
- \global\sublines@false
- \or% % 1003
-%% \ifcase\@lock
-%% \global\@lock=\@ne
-%% \else
-%% \global\@lock=\z@
-%% \fi
- \global\@lock=\@ne
- \or% % 1004
- \ifnum\@lock=\tw@
- \global\@lock=\thr@@
- \else
- \global\@lock=\z@
- \fi
- \or% % 1005
-5% \ifcase\sub@lock
-%% \global\sub@lock=\@ne
-%% \else
-%% \global\sub@lock=\z@
-%% \fi
- \global\sub@lock=\@ne
- \or% % 1006
- \ifnum\sub@lock=\tw@
- \global\sub@lock=\thr@@
- \else
- \global\sub@lock=\z@
- \fi
- \or% % 1007
- \l@dskipnumbertrue
- \else
- \led@warn@BadAction
- \fi}
-
-
-
-%%% Reworked the sidenotes code.
-%%% Sidenotes are normally aligned on their bottom lines,
-%%% i.e, multiline notes extend upwards. To align notes on
-%%% their top lines (multiline notes extend downwards):
-%%% \rightnoteupfalse and/or \leftnoteupfalse. The default
-%%% is, of course, \rightnoteuptrue and \leftnoteuptrue.
-
-\newif\ifrightnoteup
- \rightnoteuptrue
-
-\renewcommand*{\l@drsnote}[1]{%
- \ifnumberedpar@
- \xright@appenditem{\noexpand\vl@drsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi\ignorespaces}
-
-\renewcommand*{\vl@drsnote}[1]{\setl@drp@rbox{#1}}
-
-\renewcommand*{\setl@drp@rbox}[1]{%
- {\parindent\z@\hsize=\ledrsnotewidth\ledrsnotefontsetup
- \global\setbox\l@drp@rbox
- \ifrightnoteup
- =\vbox to\z@{\vss#1}%
- \else
- =\vbox to0.7\baselineskip{\strut#1\vss}%
- \fi}}
-
-\newif\ifleftnoteup
- \leftnoteuptrue
-
-\renewcommand*{\l@dlsnote}[1]{%
- \ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dlsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi\ignorespaces}
-
-\renewcommand*{\vl@dlsnote}[1]{\setl@dlp@rbox{#1}}
-
-\renewcommand*{\setl@dlp@rbox}[1]{%
- {\parindent\z@\hsize=\ledlsnotewidth\ledlsnotefontsetup
- \global\setbox\l@dlp@rbox
- \ifleftnoteup
- =\vbox to\z@{\vss #1}%
- \else
- =\vbox to 0.70\baselineskip{\strut#1\vss}%
- \fi}}
-
-\renewcommand*{\l@dcsnote}[1]{%
- \ifnumberedpar@
- \xright@appenditem{\noexpand\vl@dcsnote{#1}}%
- \to\inserts@list
- \global\advance\insert@count \@ne
- \fi\ignorespaces}
-
-\renewcommand*{\vl@dcsnote}[1]{\gdef\l@dcsnotetext{#1}}
-
-\renewcommand*{\affixside@note}{%
- \gdef\@templ@d{}%
- \ifx\@templ@d\l@dcsnotetext \else
- \if@twocolumn
- \if@firstcolumn
- \setl@dlp@rbox{\l@dcsnotetext}%
- \else
- \setl@drp@rbox{\l@dcsnotetext}%
- \fi
- \else
- \@l@dtempcntb=\sidenote@margin
- \ifnum\@l@dtempcntb>\@ne
- \advance\@l@dtempcntb by\page@num
- \fi
- \ifodd\@l@dtempcntb
- \setl@drp@rbox{\l@dcsnotetext}%
- \else
- \setl@dlp@rbox{\l@dcsnotetext}%
- \fi
- \fi
- \fi}
-
-
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%% v0.4 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-%%% The instructions on page 26 in the manual regarding creating
-%%% a new familiar footnote series are incorrect. Instead follow
-%%% how the provided series are defined, that is, for example:
-%%% \makeatletter
-%%% \newcommand{\footnoteD}[1]{%
-%%% \stepcounter{footnoteD}%
-%%% \protected@xdef\@thefnmarkD{\thefootnoteD}%
-%%% \@footnotemarkD
-%%% \vfootnoteD{D}{#1}\m@mmf@prepare}
-%%%
-%%% \newcounter{footnoteD}
-%%% \renewcommand{\thefootnoteD}{\arabic{footnoteD}}
-%%% \newinsert\footinsD
-%%%
-%%% \newcommand{\mpfootnoteD}[1]{%
-%%% \stepcounter{footnoteD}%
-%%% \protected@xdef\@thefnmarkD{\thefootnoteD}%
-%%% \@footnotemarkD
-%%% \mpvfootnoteD{D}{#1}\m@mmf@prepare}
-%%% \newinsert\mpfootinsD
-%%%
-%%% \footnormalX{D}
-%%% \addfootinsX{D}
-%%% \makeatother
-%%%
-
-%%% Change \addfootinsX to correct screwups in defining new familar
-%%% series footnotes. Problem initially noted by Dirk Schlimm
-%%% (dschlimm@gmail.com) in private email, 2005/05/31
-
-\renewcommand*{\addfootinsX}[1]{%
- \footnormalX{#1}%
- \g@addto@macro{\doxtrafeeti}{%
- \setbox\@outputbox \vbox{%
- \unvbox\@outputbox
- \ifvoid\@nameuse{footins#1}\else
- \@nameuse{footstart#1}{#1}\@nameuse{footgroup#1}{#1}\fi}}%
- \g@addto@macro{\doreinxtrafeeti}{%
- \ifvoid\@nameuse{footins#1}\else
- \insert\@nameuse{footins#1}{\unvbox\@nameuse{footins#1}}\fi}%
-%%% \g@addto@macro{\l@dfambeginmini}{%
-%%% \expandafter\let\csname footnote#1\endcsname=\@nameuse{mpfootnote#1}}%
- \g@addto@macro{\l@dfambeginmini}{%
- \expandafter\expandafter\expandafter\let\expandafter\expandafter
- \csname footnote#1\endcsname \csname mpfootnote#1\endcsname}%
-%%% \g@addto@macro{\l@dfamendmini}{%
-%%% \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1{#1}}}%
- \g@addto@macro{\l@dfamendmini}{%
- \ifvoid\@nameuse{mpfootins#1}\else\@nameuse{mpfootgroup#1}{#1}\fi}%
-}
-
-
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%% v0.3a %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%% Slight efficiency improvement (particularly for ledpar)
-
-\newcommand*{\l@dunhbox@line}[1]{\unhbox #1}
-
-\renewcommand*{\do@line}{%
- {\vbadness=10000
- \splittopskip=\z@
- \do@linehook
-\l@demptyd@ta
- \global\setbox\one@line=\vsplit\raw@text to\baselineskip}%
- \unvbox\one@line \global\setbox\one@line=\lastbox
- \getline@num
- \affixline@num
- \hb@xt@ \linewidth{\l@dld@ta\add@inserts\affixside@note
- \l@dlsn@te
-%%%% {\ledllfill\hb@xt@ \wd\one@line{\new@line\unhbox\one@line}\ledrlfill\l@drd@ta%
- {\ledllfill\hb@xt@ \wd\one@line{\new@line\l@dunhbox@line{\one@line}}\ledrlfill\l@drd@ta%
- \l@drsn@te
- }}
- \add@penalties}
-
-
-\endinput
-
-%%%%%%%%%%% earlier patches now in ledmac.sty itself
-
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index a6d79f06b60..ee50578442c 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -444,6 +444,7 @@ chomp ($Build = `cd $Master/../Build/source && pwd`);
'lcircuit', "die 'skipping, license unknown, too old to investigate'",
'leawood', "&MAKEflatten",
'lecturer', "&MAKEflatten",
+ 'ledmpar', "die 'skipping, use ledmac'",
'letter1', "die 'skipping, circa 1989, never in TL, await request'",
'lettre', "&MAKEflatten",
'lettrgth', "die 'skipping, nonfree font'",