summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/poemscol/poemscol.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/poemscol/poemscol.sty')
-rw-r--r--Master/texmf-dist/tex/latex/poemscol/poemscol.sty324
1 files changed, 213 insertions, 111 deletions
diff --git a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty
index 791dd0e0375..9f3c6111f71 100644
--- a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty
+++ b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty
@@ -22,9 +22,7 @@
%% in the same archive or directory.)
\NeedsTeXFormat{LaTeX2e}[1997/12/01]
\ProvidesPackage{poemscol}
- [2005/10/05 v2.391 poemscol file]
-
-
+ [2006/04/25 v2.49 poemscol file]
@@ -336,15 +334,15 @@
}{\newpage\thispagestyle{volumetitlestyle}\cleardoublepage}
\newenvironment{booksectionpage}
{\par\newpage\thispagestyle{volumetitlestyle}}{\newpage}
- \setlength{\marginparsep}{-18pt}
+ \setlength{\marginparsep}{18pt}
\setlength{\marginparwidth}{10pt}
\newif\ifnumbersswitch \numbersswitchfalse
\newif\ifnumbersright \numbersrighttrue
-\providecommand{\sidepar}{\@dblarg{\@sidepar}}
-\long\def\@sidepar[#1]#2{\@bsphack\leavevmode\vadjust{% %
- \checkoddpage
- \ifsideparswitch
- \ifreversesidepar
+\newcommand{\pmclsidepar}{\@dblarg{\@pmclsidepar}}
+\long\def\@pmclsidepar[#1]#2{\@bsphack\strut\vadjust{% added
+\checkoddpage
+ \ifpmclsideparswitch
+ \ifpmclreversesidepar
\ifoddpage
\oddpagefalse
\else
@@ -353,7 +351,7 @@
\fi
\else
\oddpagetrue
- \ifreversesidepar
+ \ifpmclreversesidepar
\oddpagefalse
\fi
\fi
@@ -371,12 +369,13 @@
\kern -\marginparsep \kern -\marginparwidth % at left
\fi
\fi
- \vbox to 0pt{%
- \kern \sideparvshift% % vertical shift to align top text lines
- \begin{minipage}{\marginparwidth}%
- \ifoddpage #2\else #1\fi%
+ \setbox0=\vtop to 0pt{% added
+ \begin{minipage}[t]{\marginparwidth}% added
+ \ifoddpage #2\else #1\fi%
\end{minipage}%
- \vss}}}\@esphack}
+\vss}% added
+ \vtop to 0pt{\kern\pmclsideparvshift % default should be 0pt
+ \kern-\dp\strutbox \kern-\ht0 \box0 \vss}}}\@esphack}% added
\gdef\thepmemc@@page{\the\c@page}
@@ -413,49 +412,54 @@
\ifodd\c@page\oddpagetrue\fi
\fi}
-\newif\ifreversesidepar
- \reversesidepartrue
-\newif\ifsideparswitch
- \sideparswitchfalse
-\if@twoside \sideparswitchtrue \fi
+\newif\ifpmclreversesidepar
+ \pmclreversesidepartrue
+\newif\ifpmclsideparswitch
+ \pmclsideparswitchfalse
+\if@twoside \pmclsideparswitchtrue \fi
\newif\ifoddpage
\newif\ifstrictpagecheck
\strictpagecheckfalse
\newcounter{cp@cntr}
\newcommand{\cplabel}{^_}
-\newlength{\sideparvshift}
-\setlength{\sideparvshift}{-2.58ex}
+\newlength{\pmclsideparvshift}
+\setlength{\pmclsideparvshift}{0ex}
\newcommand{\verselinenumberstoleft}{%
\setlength{\marginparsep}{18pt}%
\setlength{\marginparwidth}{10pt}%
\numbersswitchfalse\numbersrightfalse}
\newcommand{\verselinenumberstoright}{%
- \setlength{\marginparsep}{-18pt}%
+ % \setlength{\marginparsep}{-18pt}%
+ \setlength{\marginparsep}{18pt}%
\setlength{\marginparwidth}{10pt}%
\numbersswitchfalse\numbersrighttrue}
\newcommand{\verselinenumbersswitch}{%
\strictpagechecktrue%
\setlength{\marginparsep}{18pt}%
\setlength{\marginparwidth}{10pt}%
- \numbersswitchtrue\numbersrightfalse}
-\newif\ifnumbersgutter \numbersgutterfalse
+ \numbersswitchtrue\numbersrightfalse\pmclsideparswitchtrue}
+\newif\ifnumbersgutter \numbersgutterfalse%
\newcommand{\verselinenumbersgutter}{\verselinenumbersswitch%
-\reversesideparfalse\numbersguttertrue}
+\pmclreversesideparfalse%
+\numbersguttertrue%
+}
\newcommand{\verselinenumbersouter}{\verselinenumbersswitch%
-\reversesidepartrue\numbersgutterfalse}
+\pmclreversesidepartrue%
+\numbersgutterfalse}
\newcommand{\putverselinenumber}{\nolinebreak\begin{marginenvironment}%
- \nolinebreak
- \ifnumbersswitch\sidepar{\hfil\textrm{\scriptsize\theverselinenumber}}%
- \else
- \ifnumbersright\rightsidepar{\hfil\textrm{\scriptsize\theverselinenumber}}%
- \else
- \leftsidepar{\textrm{\scriptsize\theverselinenumber}\hfil}%
- \fi
- \fi
- \nolinebreak
+ \nolinebreak%
+ \ifnumbersswitch\pmclsidepar{\hfil\textrm{\scriptsize\theverselinenumber}}%
+ \else%
+ \ifnumbersright\pmclrightsidepar{\hfil\textrm{\scriptsize\theverselinenumber}}%
+ \else%
+ \pmclleftsidepar
+{\textrm{\scriptsize\theverselinenumber}\hfil}%
+ \fi%
+ \fi%
+ \nolinebreak%
\end{marginenvironment}%
- \nolinebreak
+ \nolinebreak%
}
\newif\ifspeciallinelock
\speciallinelockfalse
@@ -885,6 +889,14 @@ EXPLANATORY NOTES}\end{center}
}
\newcommand{\poemsectiontitlenocontents}[1]{%
\sequencesubsectiontitlenocontents{#1}}%
+\newcommand{\poemfirstsectiontitle}[1]{%
+\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont}%
+{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}%
+{\titleindentamount}%
+\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}%
+{\contentsindentthreeamount}%
+\t@xtnotesinfo{#1}%
+}
\newcommand{\poemfirstsectiontitlebaretitle}[1]{%
\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont}%
{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}%
@@ -1159,7 +1171,52 @@ EXPLANATORY NOTES}\end{center}
\newcommand{\interjectiontitlemiddleline}[1]{
\sequencefirstsubsectionmiddleline{#1}
}
-
+\newcommand{\setmargpoemtitle}[2]{%
+\set@margp@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont}%
+{\relax}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}{\z@}{#2}%
+\c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}%
+{\contentsindenttwoamount}%
+\t@xtnotesinfo{#1}%
+}
+\newcommand{\set@margp@emtitle}[7]{\setlength{\titleentryoverrun}{#6}%
+{#2}%
+{#3 \begin{titleentryenvironment}%
+{#4 #1 #7}\end{titleentryenvironment}}%
+{#5}%
+\m@kep@emlabel%
+\m@ken@teholder{#1}%
+\setlength{\titleentryoverrun}{\z@}}
+\newcommand{\JHpoemtitle}[2]{%
+\setmargpoemtitle{#1}{\JHlabel{#2}}%
+}
+\newcommand{\JHlabel}[1]{%
+\marginpar{{\scriptsize{\dag~p.~\pageref{#1}}}}}
+\newcommand{\JHsequencetitle}[2]{%
+\set@margp@emtitle{#1}{\sequencetitlepenalty}{\sequencetitlefont}%
+{\relax}{\nobreak\par\nobreak\aftersequencetitleskip\nobreak}{\z@}%
+{\JHlabel{#2}}%
+\putpagenumberincontentsfalse%
+\c@ntentsinfo{#1}{\contentsindentone}{\contentssequencetitlefont}%
+{\contentsindenttwoamount}%
+\putpagenumberincontentstrue%
+\t@xtnotesinfo{#1}%
+}
+\newcommand{\JHsequencesectiontitle}[2]{%
+\set@margp@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont}%
+{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}%
+{\titleindentamount}{\JHlabel{#2}}%
+\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}%
+{\contentsindentthreeamount}%
+\t@xtnotesinfo{#1}%
+}
+\newcommand{\JHsequencefirstsectiontitle}[2]{%
+\set@margp@emtitle{#1}{\par\nobreak\afterpoemtitleskip}{\poemtitlefont}%
+{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}%
+{\titleindentamount}{\JHlabel{#2}}%
+\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}%
+{\contentsindentthreeamount}%
+\t@xtnotesinfo{#1}%
+}
\newcommand{\epigraph}[1]{\nopagebreak\afterpoemtitleskip\begin{epigraphquote}
\emph{#1}\end{epigraphquote}\afterpoemtitleskip\nopagebreak}
\newcommand{\headnote}[1]{\epigraph{#1}}
@@ -1390,18 +1447,48 @@ EXPLANATORY NOTES}\end{center}
\normalfont \backmattertextfont}
\expandafter\newcommand\csname first#1\endcsname{
\immediate\write\expandafter\csname#1s\endcsname{\titletoothernotes}}
-\expandafter\newcommand\csname #1\endcsname[2][0]{
- \setlemmarange{##1}
- \csname ifno#1yet\endcsname
- \csname first#1\endcsname
- \fi
-\global\csname no#1yetfalse\endcsname
-\immediate\write\expandafter\csname #1s\endcsname{\checknoteheaders}
-\csname literal#1\endcsname{##2}
-\resetlemmacounters}
+\expandafter\newcommand\csname #1\endcsname[2][0]{%
+ \setlemmarange{##1}%
+ \csname ifno#1yet\endcsname%
+ \csname first#1\endcsname%
+ \fi%
+\global\csname no#1yetfalse\endcsname%
+\immediate\write\expandafter\csname #1s\endcsname{\checknoteheaders}%
+\csname literal#1\endcsname{##2}%
+\resetlemmacounters%
+}
+\expandafter\newcommand\csname prose#1\endcsname[3][0]{% %
+\unskip\proselinelabel{##2}%
+\setproselemmarange{##2}{##1}%
+\csname ifno#1yet\endcsname%
+\csname first#1\endcsname%
+\fi%
+\global\csname no#1yetfalse\endcsname%
+\immediate\write\expandafter\csname #1s\endcsname{\checkprosenoteheaders}%
+\csname literal#1\endcsname{##3}%
+\resetlemmacounters\unskip%
+}
+\expandafter\newcommand\csname pm#1\endcsname[2][0]{%
+ \setpmlemmarange{##1}%
+ \csname ifno#1yet\endcsname%
+ \csname first#1\endcsname%
+ \fi%
+\global\csname no#1yetfalse\endcsname%
+\immediate\write\expandafter\csname #1s\endcsname{\pmchecknoteheaders\string~}%
+\immediate\write\expandafter\csname #1s\endcsname{\pmciterange}%
+\csname literal#1\endcsname{##2}%
+\pmresetlemmacounters\unskip%
+}
\makeatletter
\appendtomacro{\poem}{\global\expandafter\csname no#1yettrue\endcsname}
\makeatother
+\makeatletter
+\appendtomacro{\prosesection}{\global\expandafter\csname no#1yettrue\endcsname}
+\makeatother
+\makeatletter
+\appendtomacro{\pmsection}{\global\expandafter\csname no#1yettrue\endcsname}
+\makeatother
+
\expandafter\newcommand\csname put#1s\endcsname{
\newpage\hyphenationforsmall
\immediate\expandafter\closeout\csname #1s\endcsname
@@ -1431,7 +1518,10 @@ EXPLANATORY NOTES}\end{center}
\else\ifnumbersswitch\rightlinenumbers*\setlength{\linenumbersep}{-\marginparsep}%
\else\leftlinenumbers*\setlength{\linenumbersep}{\marginparsep}%
\addtolength{\linenumbersep}{5pt}% seems about right
-\fi\fi}
+\fi\fi
+\noemendyettrue%
+\noexplainyettrue%
+}
{\end{linenumbers}}
\newenvironment{prosesectionnoreset}
{\begin{linenumbers}%
@@ -1585,27 +1675,35 @@ r@#2\endcsname{}{}\@nil
\newcounter{pmindexcount}\setcounter{pmindexcount}{0}
\newcommand{\setprosebysentence}{\prosebysentencetrue%
}
+\newenvironment{pmsection}{
+\noemendyettrue%
+\noexplainyettrue%
+}{}
\newcommand{\runningsentencenumberformat}[1]{\nobreak%
\textsuperscript{\scriptsize{#1}}\unskip\nobreak}
\newcommand{\marginsentencenumberformat}[1]{\scriptsize{#1}}
\newcommand{\setpmmodulo}[1]{\setcounter{pmmodulo}{#1}%
\addtocounter{pmmodulo}{-1}%
}
-\newcommand{\pmnumberstoleft}{\numbersswitchfalse\numbersrightfalse%
+\newcommand{\pmnumberstoleft}{%\catcode`\@=11%
+\numbersswitchfalse\numbersrightfalse%
\setlength{\marginparsep}{18pt}%
}
-\newcommand{\pmnumberstoright}{\numbersswitchfalse\numbersrighttrue%
+\newcommand{\pmnumberstoright}{%\catcode`\@=11%
+\numbersswitchfalse\numbersrighttrue%
\setlength{\marginparsep}{-18pt}
}
\newcommand{\pmnumbersswitch}{\strictpagechecktrue\numbersswitchtrue\numbersrightfalse%
\setlength{\marginparsep}{18pt}%
}
-\newcommand{\pmnumbersgutter}{\pmnumbersswitch%
-\reversesideparfalse\numbersguttertrue%
+\newcommand{\pmnumbersgutter}{%\catcode`\@=11%
+\pmnumbersswitch%
+\pmclreversesideparfalse\numbersguttertrue%
\setlength{\marginparsep}{18pt}%
}
-\newcommand{\pmnumbersouter}{\pmnumbersswitch%
-\reversesidepartrue\numbersgutterfalse%
+\newcommand{\pmnumbersouter}{%\catcode`\@=11%
+\pmnumbersswitch%
+\pmclreversesidepartrue\numbersgutterfalse%
\setlength{\marginparsep}{18pt}%
}
\newcommand{\putpmsentencenumber}{%
@@ -1613,55 +1711,59 @@ r@#2\endcsname{}{}\@nil
{\marginsentencenumberformat}}
\newcommand{\putpmmarginnumber}[2]{%
\nolinebreak\begin{marginenvironment}%
- \nolinebreak
- \ifnumbersswitch\sidepar{\hfil #2{#1}}%
- \else
- \ifnumbersright\rightsidepar{\hfil #2{#1}}%
- \else \leftsidepar{#2{#1}\hfil}%
- \fi
- \fi
- \nolinebreak
- \end{marginenvironment}\nolinebreak
+ \nolinebreak%
+ \ifnumbersswitch%\marginpar{\hfil #2{#1}}
+ \pmclsidepar{\hfil #2{#1}}%
+ \else%
+ \ifnumbersright%\marginpar{\hfil #2{#1}}
+ \pmclrightsidepar{\hfil #2{#1}}%
+ \else% \marginpar{#2{#1}\hfil}
+ \pmclleftsidepar
+{#2{#1}\hfil}%
+ \fi%
+ \fi%
+ \nolinebreak%
+ \end{marginenvironment}\nolinebreak%
}
\newcommand{\pmsentence}{%
\addtocounter{pmsentencenumber}{1}%
-\ifrunningsentencenumbers % add running number
+\ifrunningsentencenumbers% add running number
\runningsentencenumberformat{\thepmsentencenumber}%
\fi%
-\ifmarginsentencenumbers % add marginal number
+\ifmarginsentencenumbers% add marginal number
\addtocounter{pmindexcount}{1}%
\leavevmode%
- \ifnum\thepmindexcount>\thepmmodulo%
- \putpmsentencenumber\nobreak%
+\ifthenelse{\value{pmindexcount}>\value{pmmodulo}}%
+{ \putpmsentencenumber\nobreak%
\setcounter{pmindexcount}{0}%
- \fi%
+}{\relax}%
\fi%
\ifpmparas%
\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\else%
-\global\edef\noteheaderconcat{\thepmsentencenumber:}%
+\global\edef\noteheaderconcat{\thepmsentencenumber}
\pmnoteheader=\expandafter{\noteheaderconcat}%
\fi%
}
\newcommand{\pmsentencetwo}{%
\addtocounter{pmsentencenumber}{1}%
-\ifrunningsentencenumbers % add running number
+\ifrunningsentencenumbers% add running number
\runningsentencenumberformat{\thepmsentencenumber}%
\fi%
-\ifmarginsentencenumbers % add marginal number
+\ifmarginsentencenumbers% add marginal number
\addtocounter{pmindexcount}{1}%
\leavevmode%
- \ifnum\thepmindexcount>\thepmmodulo%
- \putpmsentencenumbertwo\nobreak%
+\ifthenelse{\value{pmindexcount}>\value{pmmodulo}}%
+{ \putpmsentencenumbertwo\nobreak%
\setcounter{pmindexcount}{0}%
- \fi%
+}{\relax}%
\fi%
\ifpmparas%
\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\else%
-\global\edef\noteheaderconcat{\thepmsentencenumber:}%
+\global\edef\noteheaderconcat{\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\fi%
}
@@ -1669,24 +1771,24 @@ r@#2\endcsname{}{}\@nil
\newcommand{\putpmsentencenumbertwo}{%
\putpmmarginnumber{\rlap{\phantom{1},~\thepmsentencenumber}}%
{\marginsentencenumberformat}}
-\newcommand{\pmsentencethree}{
+\newcommand{\pmsentencethree}{%
\addtocounter{pmsentencenumber}{1}%
-\ifrunningsentencenumbers % add running number
+\ifrunningsentencenumbers% add running number
\runningsentencenumberformat{\thepmsentencenumber}%
\fi%
-\ifmarginsentencenumbers % add marginal number
+\ifmarginsentencenumbers% add marginal number
\addtocounter{pmindexcount}{1}%
\leavevmode%
- \ifnum\thepmindexcount>\thepmmodulo%
- \putpmsentencenumberthree\nobreak%
+\ifthenelse{\value{pmindexcount}>\value{pmmodulo}}%
+{ \putpmsentencenumberthree\nobreak%
\setcounter{pmindexcount}{0}%
- \fi%
+}{\relax}%
\fi%
\ifpmparas%
\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\else%
-\global\edef\noteheaderconcat{\thepmsentencenumber:}%
+\global\edef\noteheaderconcat{\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\fi%
}
@@ -1694,24 +1796,24 @@ r@#2\endcsname{}{}\@nil
\newcommand{\putpmsentencenumberthree}{%
\putpmmarginnumber{\rlap{\phantom{1,~2},~\thepmsentencenumber}}%
{\marginsentencenumberformat}}
-\newcommand{\pmsentencefour}{
+\newcommand{\pmsentencefour}{%
\addtocounter{pmsentencenumber}{1}%
-\ifrunningsentencenumbers % add running number
+\ifrunningsentencenumbers% add running number
\runningsentencenumberformat{\thepmsentencenumber}%
\fi%
-\ifmarginsentencenumbers % add marginal number
+\ifmarginsentencenumbers% add marginal number
\addtocounter{pmindexcount}{1}%
\leavevmode%
- \ifnum\thepmindexcount>\thepmmodulo%
- \putpmsentencenumberfour\nobreak%
+\ifthenelse{\value{pmindexcount}>\value{pmmodulo}}%
+{ \putpmsentencenumberfour\nobreak%
\setcounter{pmindexcount}{0}%
- \fi%
+}{\relax}%
\fi%
\ifpmparas%
\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\else%
-\global\edef\noteheaderconcat{\thepmsentencenumber:}%
+\global\edef\noteheaderconcat{\thepmsentencenumber}%
\pmnoteheader=\expandafter{\noteheaderconcat}%
\fi%
}
@@ -1944,30 +2046,30 @@ r@#2\endcsname{}{}\@nil
\ignorespaces
\fi
\fi}
-\newlength{\pmclsideparvshift}
-\setlength{\pmclsideparvshift}{-2.58ex}%
-\newcommand{\leftsidepar}[1]{%
-\pmclbsphack\leavevmode\vadjust{% %
- \rlap{\kern-\parindent%
- \kern -\marginparsep \kern -\marginparwidth % at left
- \vbox to 0pt{%
- \kern \pmclsideparvshift% % vertical shift to align top text lines
- \begin{minipage}{\marginparwidth}%
+\newcommand{\pmclleftsidepar}[1]{%
+\pmclbsphack\strut\vadjust{% changed
+\rlap{\kern-\parindent%
+\kern -\marginparsep \kern -\marginparwidth% at left
+\setbox0=\vtop to 0pt{% added
+\begin{minipage}[t]{\marginparwidth}% added
#1%
\end{minipage}%
- \vss}}}\pmclesphack%
-}
-\newcommand{\rightsidepar}[1]{%
-\pmclbsphack\leavevmode\vadjust{% %
- \rlap{\kern-\parindent%
- \kern \textwidth \kern -\marginparsep % at right
- \vbox to 0pt{%
- \kern \pmclsideparvshift% % vertical shift to align top text lines
- \begin{minipage}{\marginparwidth}%
+\vss}% changed
+\vtop to 0pt{\kern\pmclsideparvshift % default should be 0pt
+\kern-\dp\strutbox \kern-\ht0 \box0 \vss}}}\pmclesphack}% changed
+
+\newcommand{\pmclrightsidepar}[1]{%
+\pmclbsphack\strut\vadjust{%
+\rlap{\kern-\parindent%
+\kern\textwidth\kern\marginparsep% at right
+\setbox0=\vtop to 0pt{% added
+\begin{minipage}[t]{\marginparwidth}% added
#1%
\end{minipage}%
- \vss}}}\pmclesphack%
-}
+\vss}% changed
+\vtop to 0pt{\kern\pmclsideparvshift% default should be 0pt
+\kern-\dp\strutbox \kern-\ht0 \box0 \vss}}}\pmclesphack}% changed
+
\newif\ifparalleltexts
\paralleltextsfalse
@@ -2057,7 +2159,7 @@ r@#2\endcsname{}{}\@nil
}
\renewcommand{\putverselinenumber}{\nolinebreak\begin{marginenvironment}%
\nolinebreak
- \leftsidepar{\textrm{\scriptsize\theverselinenumber}}%
+ \pmclleftsidepar{\textrm{\scriptsize\theverselinenumber}}%
\nolinebreak
\end{marginenvironment}%
\nolinebreak
@@ -2081,7 +2183,7 @@ r@#2\endcsname{}{}\@nil
\newcommand{\synchrolabel}[1]{\poemlinelabel{#1}}
\newcommand{\hfilll}{\hskip 0pt plus 1 filll}
\newcommand{\synchroref}[1]{%
-\rightsidepar{{\textrm{\scriptsize[\the\synchroflag\ref{#1}]}}}%
+\pmclrightsidepar{{\textrm{\scriptsize[\the\synchroflag\ref{#1}]}}}%
}
\newcommand{\startversopage}{
\ifrectostanzastillopen