From 3248fe623d991adc97c06036de7d66a10b130e44 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 30 Jun 2015 21:27:12 +0000 Subject: poemscol (30jun15) git-svn-id: svn://tug.org/texlive/trunk@37724 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/poemscol/poemscol.sty | 614 +++++++++++++++++++++- 1 file changed, 610 insertions(+), 4 deletions(-) (limited to 'Master/texmf-dist/tex/latex/poemscol') diff --git a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty index 825ae7c4c68..b64355fa848 100644 --- a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty +++ b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty @@ -22,7 +22,7 @@ %% in the same archive or directory.) \NeedsTeXFormat{LaTeX2e}[1997/12/01] \ProvidesPackage{poemscol} - [2015/6/18 v2.7 poemscol file] + [2015/6/18 v2.72 poemscol file] @@ -30,6 +30,14 @@ +%% +%% In my own book I also, strictly to save money, and at the price of +%% some ugliness, changed the definition of |\normalsize| and |\small|, +%% so that the former was 10 pt type on 11 pt leading (rather than 12 +%% pt), and that the latter was 9 pt type on 10 pt leading. You can +%% reproduce this setting by issuing |\tightleading|, although I would +%% advise not doing so unless you are under financial constraints. + \newcommand{\tightgeometry}{\geometry{verbose, tmargin= 33pt, @@ -234,7 +242,6 @@ \leftheader{\relax} \volumeheader{\relax} \newcommand{\rightheader}[1]{\volumeheader{#1}} - \newlength{\headoffsetlength} \setlength{\headoffsetlength}{-1sp} \raggedbottom @@ -2499,7 +2506,8 @@ r@#2\endcsname{}{}\@nil \c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}% {\contentsindenttwoamount}% } -\newcommand{\versoset@p@emtitle}[6]{\setlength{\titleentryoverrun}{#6}% +\newcommand{\versoset@p@emtitle}[6]{\pmclversoresetsettitleinnotes% +\setlength{\titleentryoverrun}{#6}% {#2}% {#3 \begin{titleentryenvironment}% {\ifcentertitleson\begin{center}#4 #1\end{center}\else #4 #1\fi}% @@ -2552,7 +2560,8 @@ r@#2\endcsname{}{}\@nil \c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}% {\contentsindenttwoamount}% } -\newcommand{\rectoset@p@emtitle}[6]{\setlength{\titleentryoverrun}{#6}% +\newcommand{\rectoset@p@emtitle}[6]{\pmclrectoresetsettitleinnotes +\setlength{\titleentryoverrun}{#6}% {#2}% {#3 \begin{titleentryenvironment}% {\ifcentertitleson\begin{center}#4 #1\end{center}\else #4 #1\fi}% @@ -2739,7 +2748,604 @@ r@#2\endcsname{}{}\@nil \end{quotedverse} \fi \rectofalse\versofalse\paralleltextsfalse +\makeatletter\pmclresetsettitleinnotes\makeatother +} +\newtoks{\versotextnotesname} +\versotextnotesname={TEXTUAL NOTES} +\newcommand{\changeversotextnotesname}[1]{\versotextnotesname={#1}} +\newtoks{\versotextnotesheadername} +\versotextnotesheadername={Textual Notes to} +\newcommand{\changeversotextnotesheader}[1]{\versotextnotesheadername={#1}} +\newtoks{\versotextnotescontentsname} +\versotextnotescontentsname={Textual Notes} +\newcommand{\changeversotextnotescontentsname}[1]{% +\versotextnotescontentsname={#1}} +\newif\ifversotextnotestwocol +\versotextnotestwocolfalse +\newcommand{\makeversotextnotes}{\global\textnotesontrue + \newwrite\versotextnotes + \global\verselinenumberstrue + \immediate\openout\versotextnotes=\jobname.vtn + \literalversotextnote{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\versotextnotesheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\versotextnotesheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\versotextnotesname}{versotextnotes} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifversotextnotestwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newif\ifversotextnotessinglepar +\newif\ifnoversotextnoteyet +\newcommand{\literalversotextnote}[1]{\begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\versotextnotes{\expandafter\strip\meaning\next}% + \endgroup +} +\newcommand{\firstversotextnote}{\immediate\write\versotextnotes{\versotitletoothernotes} + \ifversotextnotessinglepar% + \literalversotextnote{\par}% + \fi% ifversotextnotessinglepa + } +\newcommand{\versotextnote}[2][0]{\versotitleinnotescheck + \setlemmarange{#1}% + \ifnoversotextnoteyet % firstversotextnote + \firstversotextnote + \fi %noversotextnoteyet + \global\noversotextnoteyetfalse +\immediate\write\versotextnotes{\checknoteheaders}% + \literalversotextnote{#2}% + \ifversotextnotessinglepar% + \literalversotextnote{\par}% + \fi% ifversotextnotessinglepar +\resetlemmacounters +} +\newtoks{\rectotextnotesname} +\rectotextnotesname={TEXTUAL NOTES} +\newcommand{\changerectotextnotesname}[1]{\rectotextnotesname={#1}} +\newtoks{\rectotextnotesheadername} +\rectotextnotesheadername={Textual Notes to} +\newcommand{\changerectotextnotesheader}[1]{\rectotextnotesheadername={#1}} +\newtoks{\rectotextnotescontentsname} +\rectotextnotescontentsname={Textual Notes} +\newcommand{\changerectotextnotescontentsname}[1]{% +\rectotextnotescontentsname={#1}} +\newif\ifrectotextnotestwocol +\rectotextnotestwocolfalse +\newcommand{\makerectotextnotes}{\global\textnotesontrue + \newwrite\rectotextnotes + \global\verselinenumberstrue + \immediate\openout\rectotextnotes=\jobname.rtn + \literalrectotextnote{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\rectotextnotesheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\rectotextnotesheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\rectotextnotesname}{rectotextnotes} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifrectotextnotestwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newif\ifrectotextnotessinglepar +\newif\ifnorectotextnoteyet +\newcommand{\literalrectotextnote}[1]{\begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\rectotextnotes{\expandafter\strip\meaning\next}% + \endgroup +} +\newcommand{\firstrectotextnote}{\immediate\write\rectotextnotes{\rectotitletoothernotes} + \ifrectotextnotessinglepar% + \literalrectotextnote{\par}% + \fi% ifrectotextnotessinglepar +} +\newcommand{\rectotextnote}[2][0]{\rectotitleinnotescheck + \setlemmarange{#1}% + \ifnorectotextnoteyet % firstrectotextnote + \firstrectotextnote + \fi %norectotextnoteyet + \global\norectotextnoteyetfalse +\immediate\write\rectotextnotes{\checknoteheaders}% + \literalrectotextnote{#2}% + \ifrectotextnotessinglepar% + \literalrectotextnote{\par}% + \fi% ifrectotextnotessinglepar +\resetlemmacounters +} +\newtoks{\versoemendationsname} +\versoemendationsname={EMENDATIONS} +\newcommand{\changeversoemendationsname}[1]{\versoemendationsname={#1}} +\newtoks{\versoemendationsheadername} +\versoemendationsheadername={Emendations to} +\newcommand{\changeversoemendationsheader}[1]{\versoemendationsheadername={#1}} +\newtoks{\versoemendationscontentsname} +\versoemendationscontentsname={Emendations} +\newcommand{\changeversoemendationscontentsname}[1]{% +\versoemendationscontentsname={#1}} +\newif\ifversoemendationstwocol +\versoemendationstwocolfalse +\newcommand{\makeversoemendations}{\global\emendationsontrue + \newwrite\versoemendations + \global\verselinenumberstrue + \immediate\openout\versoemendations=\jobname.vem + \literalversoemendation{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\versoemendationsheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\versoemendationsheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\versoemendationsname}{versoemendations} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifversoemendationstwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newif\ifversoemendationssinglepar +\newif\ifnoversoemendationyet +\newcommand{\literalversoemendation}[1]{\begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\versoemendations{\expandafter\strip\meaning\next}% + \endgroup +} +\newcommand{\firstversoemendation}{\immediate\write\versoemendations{\versotitletoothernotes} + \ifversoemendationssinglepar% + \literalversoemendation{\par}% + \fi% ifversoemendationssinglepar +} +\newcommand{\versoemendation}[2][0]{\versotitleinnotescheck% + \setlemmarange{#1}% + \ifnoversoemendationyet % firstversoemendation + \firstversoemendation + \fi %noversoemendationyet + \global\noversoemendationyetfalse +\immediate\write\versoemendations{\checknoteheaders}% + \literalversoemendation{#2}% + \ifversoemendationssinglepar% + \literalversoemendation{\par}% + \fi% ifversoemendationssinglepar +\resetlemmacounters +} +\newtoks{\rectoemendationsname} +\rectoemendationsname={EMENDATIONS} +\newcommand{\changerectoemendationsname}[1]{\rectoemendationsname={#1}} +\newtoks{\rectoemendationsheadername} +\rectoemendationsheadername={Emendations to} +\newcommand{\changerectoemendationsheader}[1]{\rectoemendationsheadername={#1}} +\newtoks{\rectoemendationscontentsname} +\rectoemendationscontentsname={Emendations} +\newcommand{\changerectoemendationscontentsname}[1]{% +\rectoemendationscontentsname={#1}} +\newif\ifrectoemendationstwocol +\rectoemendationstwocolfalse +\newcommand{\makerectoemendations}{\global\emendationsontrue + \newwrite\rectoemendations + \global\verselinenumberstrue + \immediate\openout\rectoemendations=\jobname.rem + \literalrectoemendation{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\rectoemendationsheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\rectoemendationsheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\rectoemendationsname}{rectoemendations} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifrectoemendationstwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newif\ifrectoemendationssinglepar +\newif\ifnorectoemendationyet +\newcommand{\literalrectoemendation}[1]{\begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\rectoemendations{\expandafter\strip\meaning\next}% + \endgroup +} +\newcommand{\firstrectoemendation}{\immediate\write\rectoemendations{\rectotitletoothernotes} + \ifrectoemendationssinglepar% + \literalrectoemendation{\par}% + \fi% ifrectoemendationssinglepar +} +\newcommand{\rectoemendation}[2][0]{\rectotitleinnotescheck + \setlemmarange{#1}% + \ifnorectoemendationyet % firstrectoemendation + \firstrectoemendation + \fi %norectoemendationyet + \global\norectoemendationyetfalse +\immediate\write\rectoemendations{\checknoteheaders}% + \literalrectoemendation{#2}% + \ifrectoemendationssinglepar% + \literalrectoemendation{\par}% + \fi% ifrectoemendationssinglepar +\resetlemmacounters +} +\newtoks{\versoexplanationsname} +\versoexplanationsname={EXPLANATORY NOTES} +\newcommand{\changeversoexplanationsname}[1]{\versoexplanationsname={#1}} +\newtoks{\versoexplanationsheadername} +\versoexplanationsheadername={Explanatory Notes to} +\newcommand{\changeversoexplanationsheader}[1]{\versoexplanationsheadername={#1}} +\newtoks{\versoexplanationscontentsname} +\versoexplanationscontentsname={Explanatory Notes} +\newcommand{\changeversoexplanationscontentsname}[1]{% +\versoexplanationscontentsname={#1}} +\newif\ifversoexplanationstwocol +\versoexplanationstwocolfalse +\newcommand{\makeversoexplanatorynotes}{\global\explanontrue + \global\verselinenumberstrue + \newwrite\versoexplanations + \immediate\openout\versoexplanations=\jobname.vex + \literalversoexplain{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\versoexplanationsheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\versoexplanationsheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\versoexplanationsname}{versoexplanatorynotes} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifversoexplanationstwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newcommand{\literalversoexplain}[1]{ + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\versoexplanations{\expandafter\strip\meaning\next}% + \endgroup +} +\newif\ifversoexplanationssinglepar +\newcommand{\firstversoexplanatory}{\immediate\write\versoexplanations{\versotitletoothernotes} + \ifversoexplanationssinglepar% + \literalversoexplain{\par}% +\fi} +\newif\ifnoversoexplainyet +\newcommand{\versoexplanatory}[2][0]{\versotitleinnotescheck% +\ifexplanon + \setlemmarange{#1}% + \ifnoversoexplainyet % first versoexplanation + \firstversoexplanatory + \fi %noversoexplainyet + \global\noversoexplainyetfalse +\immediate\write\versoexplanations{\checknoteheaders}% + \literalversoexplain{#2}% + \ifversoexplanationssinglepar% + \literalversoexplain{\par}% + \fi% + \fi % ifexplanon +\resetlemmacounters +} +\newtoks{\rectoexplanationsname} +\rectoexplanationsname={EXPLANATORY NOTES} +\newcommand{\changerectoexplanationsname}[1]{\rectoexplanationsname={#1}} +\newtoks{\rectoexplanationsheadername} +\rectoexplanationsheadername={Explanatory Notes to} +\newcommand{\changerectoexplanationsheader}[1]{\rectoexplanationsheadername={#1}} +\newtoks{\rectoexplanationscontentsname} +\rectoexplanationscontentsname={Explanatory Notes} +\newcommand{\changerectoexplanationscontentsname}[1]{% +\rectoexplanationscontentsname={#1}} +\newif\ifrectoexplanationstwocol +\rectoexplanationstwocolfalse +\newcommand{\makerectoexplanatorynotes}{\global\explanontrue + \global\verselinenumberstrue + \newwrite\rectoexplanations + \immediate\openout\rectoexplanations=\jobname.rex + \literalrectoexplain{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em \the\rectoexplanationsheadername~\mymarks}}} +\fancyhead[CE]{{\small{\em \the\rectoexplanationsheadername~\mymarks}}} +\fancyfoot{} +\mark{3} +\setendnotessectiontitle{\the\rectoexplanationsname}{rectoexplanatorynotes} +\tolerance=500\language=0 +\normalfont \backmattertextfont +\ifrectoexplanationstwocol +\begin{multicols}{2} +\fi +\setlength{\parindent}{-10pt} +} +} +\newcommand{\literalrectoexplain}[1]{ + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\rectoexplanations{\expandafter\strip\meaning\next}% + \endgroup +} +\newif\ifrectoexplanationssinglepar +\newcommand{\firstrectoexplanatory}{\immediate\write\rectoexplanations{\rectotitletoothernotes} + \ifrectoexplanationssinglepar% + \literalrectoexplain{\par}% + \fi% +} +\newif\ifnorectoexplainyet +\newcommand{\rectoexplanatory}[2][0]{\rectotitleinnotescheck% +\ifexplanon + \setlemmarange{#1}% + \ifnorectoexplainyet % first rectoexplanation + \firstrectoexplanatory + \fi %norectoexplainyet + \global\norectoexplainyetfalse +\immediate\write\rectoexplanations{\checknoteheaders}% + \literalrectoexplain{#2}% + \ifrectoexplanationssinglepar% + \literalrectoexplain{\par}% + \fi% + \fi % ifexplanon +\resetlemmacounters +} +\newcommand{\versoprosetextnote}[3][0]{% +\iftextnoteson% +\versotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifnoversotextnoteyet % firstversotextnote + \firstversotextnote + \fi %noversotextnoteyet + \global\noversotextnoteyetfalse +\immediate\write\versotextnotes{\checkprosenoteheaders}% +\literalversotextnote{#3}% +\ifversotextnotessinglepar% +\literalversotextnote{\par}% +\fi% +\resetlemmacounters% +\fi\unskip% +} +\newcommand{\versoproseemendation}[3][0]{% +\ifemendationson% +\versotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifredundantemendations + \iftextnoteson + \ifrangelemma + \versoprosetextnote[#1]{#2}{#3}% + \else + \versoprosetextnote{#2}{#3}% + \fi % ifrangelemma} + \fi %iftextnoteson +\ifversotextnotessinglepar% +\literalversotextnote{\par}% +\fi% iftextnotessinglepar + \fi % ifredundantemendations + \ifnoversoemendationyet % firstemendation + \firstversoemendation + \fi%noemendyet + \global\noversoemendationyetfalse +\immediate\write\versoemendations{\checkprosenoteheaders}% + \literalversoemendation{#3}% +\ifversoemendationssinglepar% +\literalversoemendation{\par}% +\fi% ifemendationssinglep + \resetlemmacounters% +\fi\unskip% +} +\newcommand{\versoproseexplanatory}[3][0]{% +\ifexplanon% +\versotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifnoversoexplainyet% firstexplanation + \firstversoexplanatory% + \fi%noexplainyet + \global\noversoexplainyetfalse% +\immediate\write\versoexplanations{\checkprosenoteheaders}% + \literalversoexplain{#3}% +\ifversoexplanationssinglepar% + \literalversoexplain{\par}% + \fi% ifexplanationssinglepar + \resetlemmacounters% +\fi\unskip% +} +\newcommand{\rectoprosetextnote}[3][0]{% +\iftextnoteson% +\rectotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifnorectotextnoteyet % firstrectotextnote + \firstrectotextnote + \fi %norectotextnoteyet + \global\norectotextnoteyetfalse +\immediate\write\rectotextnotes{\checkprosenoteheaders}% +\literalrectotextnote{#3}% +\ifrectotextnotessinglepar% +\literalrectotextnote{\par}% +\fi% +\resetlemmacounters% +\fi\unskip% +} +\newcommand{\rectoproseemendation}[3][0]{% +\ifemendationson% +\rectotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifredundantemendations + \iftextnoteson + \ifrangelemma + \rectoprosetextnote[#1]{#2}{#3}% + \else + \rectoprosetextnote{#2}{#3}% + \fi % ifrangelemma} + \fi %iftextnoteson +\ifrectotextnotessinglepar% +\literalrectotextnote{\par}% +\fi% iftextnotessinglepar + \fi % ifredundantemendations + \ifnorectoemendationyet % firstemendation + \firstrectoemendation + \fi%noemendyet + \global\norectoemendationyetfalse +\immediate\write\rectoemendations{\checkprosenoteheaders}% + \literalrectoemendation{#3}% +\ifrectoemendationssinglepar% +\literalrectoemendation{\par}% +\fi% ifemendationssinglep + \resetlemmacounters% +\fi\unskip% +} +\newcommand{\rectoproseexplanatory}[3][0]{% +\ifexplanon% +\rectotitleinnotescheck +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifnorectoexplainyet% firstexplanation + \firstrectoexplanatory% + \fi%noexplainyet + \global\norectoexplainyetfalse% +\immediate\write\rectoexplanations{\checkprosenoteheaders}% + \literalrectoexplain{#3}% +\ifrectoexplanationssinglepar% + \literalrectoexplain{\par}% + \fi% ifexplanationssinglepar + \resetlemmacounters% +\fi\unskip% } +\newcommand{\pmclresetsettitleinnotes}{% +\noversoemendationyettrue% +\noversoexplainyettrue% +\noversotextnoteyettrue% +\norectoemendationyettrue% +\norectoexplainyettrue% +\norectotextnoteyettrue% +} +\newcommand{\pmclversoresetsettitleinnotes}{% +\noversoemendationyettrue% +\noversoexplainyettrue% +\noversotextnoteyettrue% +} +\newcommand{\pmclrectoresetsettitleinnotes}{% +\norectoemendationyettrue% +\norectoexplainyettrue% +\norectotextnoteyettrue% +} +\let\literalexplanatory=\literalexplain +\let\literalversoexplanatory=\literalversoexplain +\let\literalrectoexplanatory=\literalrectoexplain +\newcommand{\putversotextnotes}{ +\iftextnoteson +\ifversotextnotestwocol +\literalversotextnote{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\versotextnotes + \input \jobname.vtn +\contentsendnotestitle{\the\versotextnotescontentsname}{versotextnotes} +\else + \relax +\fi} +\newcommand{\putrectotextnotes}{ +\iftextnoteson +\ifrectotextnotestwocol +\literalrectotextnote{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\rectotextnotes + \input \jobname.rtn +\contentsendnotestitle{\the\rectotextnotescontentsname}{rectotextnotes} +\else + \relax +\fi} +\newcommand{\putversoemendations}{ +\ifemendationson +\ifversoemendationstwocol +\literalversoemendation{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\versoemendations + \input \jobname.vem +\contentsendnotestitle{\the\versoemendationscontentsname}{versoemendations} +\else + \relax +\fi} +\newcommand{\putrectoemendations}{ +\ifemendationson +\ifrectoemendationstwocol +\literalrectoemendation{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\rectoemendations + \input \jobname.rem +\contentsendnotestitle{\the\rectoemendationscontentsname}{rectoemendations} +\else + \relax +\fi} +\newcommand{\putversoexplanatorynotes}{ +\ifexplanon +\ifversoexplanationstwocol +\literalversoexplain{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\versoexplanations + \input \jobname.vex +\ifpoemcontentson + \ifexplanon +\contentsendnotestitle{\the\versoexplanationscontentsname}{versoexplanatorynotes} + \fi +\fi +\else + \relax +\fi}% \end{macrocode} +\newcommand{\putrectoexplanatorynotes}{ +\ifexplanon +\ifrectoexplanationstwocol +\literalrectoexplain{\end{multicols}} +\fi %\iftextnotetwocol + \newpage + \hyphenationforsmall + \immediate\closeout\rectoexplanations + \input \jobname.rex +\ifpoemcontentson + \ifexplanon +\contentsendnotestitle{\the\rectoexplanationscontentsname}{rectoexplanatorynotes} + \fi +\fi +\else + \relax +\fi} \newif\ifversopassagestillopen \versopassagestillopenfalse \newif\ifrectopassagestillopen -- cgit v1.2.3