diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2024-05-26 15:46:40 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2024-05-26 15:46:40 +0000 |
commit | 1590278b1c9181564368224bde24b2b6f463c58a (patch) | |
tree | 30980ef7a70d258352dd54e4c878cd9a8e779611 /Master/texmf-dist | |
parent | 27021a9c27ee1d7dd78d8672655cc70a22229da7 (diff) |
[CWEB] Allow for multi-page tables-of-contents.
HiTeX has a three-page ToC.
git-svn-id: svn://tug.org/texlive/trunk@71359 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rw-r--r-- | Master/texmf-dist/tex/plain/cweb/cwebacromac.tex | 7 | ||||
-rw-r--r-- | Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex | 4 |
2 files changed, 6 insertions, 5 deletions
diff --git a/Master/texmf-dist/tex/plain/cweb/cwebacromac.tex b/Master/texmf-dist/tex/plain/cweb/cwebacromac.tex index 9782d44f498..f8462d06a37 100644 --- a/Master/texmf-dist/tex/plain/cweb/cwebacromac.tex +++ b/Master/texmf-dist/tex/plain/cweb/cwebacromac.tex @@ -16,12 +16,13 @@ \fi % end of LuaTeX->pdfTeX redirection macros % Used in cwebmac.tex, pdfctwimac.tex, pdfproofmac.tex +\def\tocpages{1} % Most programs have one-page Table-of-Contents \def\startpdf{\def\pagemode{/PageMode /UseOutlines} - \ifnum\contentspagenumber=0 \advance \pageno by -1 - \def\pagelabels{/PageLabels << /Nums [ 0 << /S/D/St 1 >> + \ifnum\contentspagenumber=0 \advance \pageno by -\tocpages + \def\pagelabels{/PageLabels << /Nums [ 0 << /S/D/St \tocpages >> \the\pageno << /P(Contents) >> ] >>} \else \twodigits=\pageno \pageno=\contentspagenumber - \advance \pageno by 1 \advance \twodigits by -\pageno + \advance \pageno by \tocpages \advance \twodigits by -\pageno \def\pagelabels{/PageLabels << /Nums [ 0 << /S/D/St \the\pageno >> \the\twodigits << /S/D/St \contentspagenumber >> ] >>} \fi \ifpdflua\pdfcatalog{\pagemode\space\pagelabels} diff --git a/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex b/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex index 48bf684332e..237b9f39c38 100644 --- a/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex +++ b/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex @@ -26,8 +26,8 @@ \def\pagelabels{/PageLabels << /Nums [ \ifnum\contentspagenumber=0 0 << /P(Contents) >> \tocpages << /S/D/St 1 >> \else 0 << /S/D/St \contentspagenumber >> \fi ] >> } - \def\startpdf{\ifpdf \ifpdflua\pdfcatalog{\pagemode \pagelabels} - \else {\special{pdf: docview << \pagemode \pagelabels >>}}\fi\fi} + \def\startpdf{\ifpdflua\pdfcatalog{\pagemode\space\pagelabels} + \else {\special{pdf: docview << \pagemode\space\pagelabels >>}}\fi} % Redefine '\con' to be invoked before the first '\N' (starred section). \let\ORGcon\con \def\con{% |