summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/poemscol
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2020-06-02 21:14:04 +0000
committerKarl Berry <karl@freefriends.org>2020-06-02 21:14:04 +0000
commitc36ac7b086b2cb672ea6226c28b6890c342d4908 (patch)
treedb7fd388112e8e523e909b5296c4737e85d6097e /Master/texmf-dist/source/latex/poemscol
parentdf0f43153a3cc03691b1abe49f881dc1332a2976 (diff)
poemscol (2jun20)
git-svn-id: svn://tug.org/texlive/trunk@55389 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/poemscol')
-rw-r--r--Master/texmf-dist/source/latex/poemscol/poemscol.dtx64
1 files changed, 39 insertions, 25 deletions
diff --git a/Master/texmf-dist/source/latex/poemscol/poemscol.dtx b/Master/texmf-dist/source/latex/poemscol/poemscol.dtx
index 0a360fbd3de..5a4984c229d 100644
--- a/Master/texmf-dist/source/latex/poemscol/poemscol.dtx
+++ b/Master/texmf-dist/source/latex/poemscol/poemscol.dtx
@@ -23,7 +23,7 @@
% \iffalse
%<package>\NeedsTeXFormat{LaTeX2e}[1997/12/01]
%<package>\ProvidesPackage{poemscol}
-%<package> [2019/10/29 v3.141 poemscol file]
+%<package> [2020/06/02 v3.14159 poemscol file]
%
%<*driver>
\documentclass{ltxdoc}
@@ -38,7 +38,7 @@
%</driver>
% \fi
%
-% \CheckSum{10539}
+% \CheckSum{10550}
%
% \CharacterTable
% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -263,9 +263,11 @@
% sections numbered by paragraph and sentence. You can suppress the appearance of the
% first sentence number, whether in the margin or in the running text. You can suppress
% the appearance of the first paragraph number, whether in the margin or in the running text.}
-% \changes{v3.14159}{2020/05/25}{Changed controlling how to place
+% \changes{v3.1415}{2020/05/25}{Changed controlling how to place
% marginal marks in JHpoemtitle and its siblings, and in JHtextnote
% and its siblings. Marginal marks are now set using their own inserts, rather than using marginpar.}
+% \changes{v3.14159}{2020/06/02}{Marginal marks set by JHpoemtitle now work with the different
+% title placement schemes.}
% \DoNotIndex{\newcommand,\newenvironment,\def,\edef,\else,\renewcommand,\makeatletter,\makeatother}
% \DoNotIndex{\abovedisplayskip,\belowdisplayskip,\abovedisplayshortskip,\belowdisplayshortskip}
% \DoNotIndex{\newcommand, \section, \subsection, \subsubsection,
@@ -298,15 +300,15 @@
% \textsc, \unskip}
% \setcounter{IndexColumns}{2}
% \MakeShortVerb{|}
-% \def\fileversion{3.1415}
-% \def\filedate{25 May 2020}
-% \def\docdate{25 May 2020}
+% \def\fileversion{3.14159}
+% \def\filedate{2 June 2020}
+% \def\docdate{2 June 2020}
% \title{Typesetting Poetry Collections with
% \textsf{poemscol}\thanks{This document corresponds to
% \textsf{poemscol}~\fileversion, dated \filedate.}}
% \author{John Burt
% \\ \texttt{burt@brandeis.edu}}
-% \date{25 May 2020}
+% \date{2 June 2020}
% \maketitle
% \begin{abstract} \textsf{poemscol} provides commands for \LaTeX\ for
% setting collections of poetry. It is especially suited for setting
@@ -632,9 +634,11 @@
% These marks could be returned to their normal position in the
% margin by setting the boolean |\margrefstomargin| to true. As of
% version 3.141 these marks are set in the margin by default even
-% when verse block centering is in effect. The marks can be made to
-% move towards the verse block when verse block centering is in
-% effect by setting |\margrefstomargin| to false.
+% when verse block centering is in effect. The boolean |\margrefstomargin| controls
+% nothing, but has been left in case I decide to restore the possibility
+% of moving the marginal marks in when the lines are centered. You can control
+% the horizontal placement of these marginal marks by changing the value
+% of the length |\JHmarginparsep|.
%
% \section{Marking up individual poems}
% First, a word about the command names. The command names may seem
@@ -7115,6 +7119,7 @@
\newcommand{\interjectiontitlemiddleline}[1]{
\sequencefirstsubsectionmiddleline{#1}
}
+% \subsubsection{Titles and Notes with marginal marks}
% \end{macrocode}
% \begin{macro}{\setmargpoemtitle}
% Titles with a marginal reference to the notes giving the page in
@@ -7131,6 +7136,10 @@
\setlength{\JHmarginparsep}{0pt}
\newlength{\JHmarginparvshift}
\setlength{\JHmarginparvshift}{0pt}
+\newlength{\JHmarginparwidth}
+\setlength{\JHmarginparwidth}{\marginparwidth}
+\newlength{\JHmarginparsepmin}
+\setlength{\JHmarginparsepmin}{\marginparsepmin}
\newif{\ifJHmarkstoleft}
\JHmarkstolefttrue
\newif{\ifJHmarkstoright}
@@ -7188,23 +7197,19 @@
\rlap{\kern-\parindent%
\kern\JHtextwidth\kern\JHmarginparsep% at right
\setbox0=\vtop to 0pt{% added
-\begin{minipage}[t]{\marginparwidth}% added
+\begin{minipage}[t]{\JHmarginparwidth}% added
#1%
\end{minipage}%
\vss}%
\vtop to 0pt{\kern\JHmarginparvshift% default should be 0pt
\kern-\dp\strutbox \kern-\ht0 \box0 \vss}}}\pmclesphack}%
-% setmargref command %right side only for now
-%\newcommand{\setmargref}{
-%\JHrightmarginpar{\scriptsize {\the\margrefmarker~p.~\pageref{margref\themargrefnumber}}}
-%}
% jhleftmarginpar command for notes % left side
\newcommand{\JHleftmarginpar}[1]{%
\pmclbsphack\strut\vadjust{% changed
\rlap{\kern-\parindent%
-\kern -\JHmarginparsep \kern -\marginparwidth% at left
+\kern -\JHmarginparsep \kern -\JHmarginparwidth% at left
\setbox0=\vtop to 0pt{
-\begin{minipage}[t]{\marginparwidth}% added
+\begin{minipage}[t]{\JHmarginparwidth}% added
#1%
\end{minipage}%
\vss}% changed
@@ -7274,7 +7279,7 @@
\rlap{\kern-\parindent
\if@twocolumn
\if@firstcolumn % put at left
- \kern -\JHmarginparsep \kern -\marginparwidth % at left
+ \kern -\JHmarginparsep \kern -\JHmarginparwidth % at left
\else % put at right
\kern \columnwidth \kern \JHmarginparsep % at right
\fi
@@ -7282,14 +7287,14 @@
\ifoddpage % put at right
\kern \textwidth \kern \JHmarginparsep % at right
\else % put at left
- \kern -\JHmarginparsep \kern -\marginparwidth % at left
+ \kern -\JHmarginparsep \kern -\JHmarginparwidth % at left
\fi
\fi
% \vbox to 0pt{%
% \kern \JHmarginparvshift% % vertical shift to align top text lines
-% \begin{minipage}{\marginparwidth}%
+% \begin{minipage}{\JHmarginparwidth}%
\setbox0=\vtop to 0pt{% added
- \begin{minipage}[t]{\marginparwidth}% added
+ \begin{minipage}[t]{\JHmarginparwidth}% added
\ifoddpage #2\else #1\fi%
\end{minipage}%
% \vss}}}\@esphack}
@@ -7302,25 +7307,30 @@
\newcommand{\JHrighttitlemarginpar}[1]{%
\pmclbsphack\strut\vadjust{%
\rlap{\kern-\parindent%
-\kern\JHtextwidth\kern\JHmarginparsep% at right
+\kern\textwidth\kern\JHmarginparsep% at right
+\ifcentertitleson
\kern-.5\JHtextwidth\kern\marginparsepmin
+\fi
\setbox0=\vtop to 0pt{% added
-\begin{minipage}[t]{\marginparwidth}% added
+\begin{minipage}[t]{\JHmarginparwidth}% added
#1%
\end{minipage}%
\vss}%
\vtop to 0pt{\kern\JHmarginparvshift% default should be 0pt
\kern-\dp\strutbox \kern-\ht0 \box0 \vss}}}\pmclesphack}%
+
%
% commands for placing the marginal marks for titles
% left side
\newcommand{\JHlefttitlemarginpar}[1]{%
\pmclbsphack\strut\vadjust{% changed
\rlap{\kern-\parindent%
-\kern -\JHmarginparsep \kern -\marginparwidth% at left
+\kern -\JHmarginparsep \kern -\JHmarginparwidth% at left
+\ifcentertitleson
\kern-.5\JHtextwidth\kern\marginparsepmin
+\fi
\setbox0=\vtop to 0pt{
-\begin{minipage}[t]{\marginparwidth}% added
+\begin{minipage}[t]{\JHmarginparwidth}% added
#1%
\end{minipage}%
\vss}% changed
@@ -7357,10 +7367,14 @@
\else
\ifoddpage % put at right
\kern \textwidth \kern \JHmarginparsep % at right
+ \ifcentertitleson
\kern-.5\JHtextwidth\kern\marginparsepmin
+ \fi
\else % put at left
\kern -\JHmarginparsep \kern -\marginparwidth % at left
+ \ifcentertitleson
\kern-.5\JHtextwidth\kern\marginparsepmin
+ \fi
\fi
\fi
% \vbox to 0pt{%