summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/ledmac/ledpar.sty
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 /Master/texmf-dist/tex/latex/ledmac/ledpar.sty
parentbe52161d176ec8b83077d89810997f588fa7e62e (diff)
ledmac (ledpar) update (23aug11)
git-svn-id: svn://tug.org/texlive/trunk@23663 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/ledmac/ledpar.sty')
-rw-r--r--Master/texmf-dist/tex/latex/ledmac/ledpar.sty561
1 files changed, 318 insertions, 243 deletions
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
%%