summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2020-07-03 06:53:40 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2020-07-03 06:53:40 +0000
commitec9b6b12896f5b4ccb0ad6aef866a0ffc3bba4fd (patch)
treedf40143f7710b5ed716c2567ecd1b0b81c4f0b94 /Build/source/texk/web2c/cwebdir
parenta9a1e2c1b463800864287f1a241009081eaa42ea (diff)
[CWEB] More macro simplifications.
git-svn-id: svn://tug.org/texlive/trunk@55738 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cwebdir')
-rw-r--r--Build/source/texk/web2c/cwebdir/cwebman-w2c.ch31
1 files changed, 7 insertions, 24 deletions
diff --git a/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch b/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch
index 71dabd1d121..36538a03be8 100644
--- a/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch
@@ -47,34 +47,18 @@
\newcount\destcount \destcount=1\relax
-\def\bkminfo{}
+\def\subsections{0}
\outer\def\section #1.{\penalty-500\bigskip
\centerline{\sectionfont\def\.##1{{\twelvett##1}}
\ifacro\vbox to 0pt{\kern-2.5ex\relax
\ifpdftex\pdfdest num \destcount fitbh\relax
\else\special{pdf: dest (\the\destcount) [ @thispage /FitBH @ypos ]}\fi
\def\.##1{##1}\def\TeX{TeX}%
- \ifx\bkminfo\empty\def\sectitle{#1}\else\def\sectitle{#1 (\bkminfo)}\fi
- \ifpdftex\pdfoutline goto num \destcount {\sectitle}\relax
- \else\special{pdf: outline 0 << /Title (\sectitle)
+ \ifpdftex\pdfoutline goto num \destcount
+ \ifnum\subsections>0 count -\subsections\fi {#1}\relax
+ \else\special{pdf: outline 0 << /Title (#1)
/A << /S /GoTo /D (\the\destcount) >> >>}\fi
- \gdef\bkminfo{}%
- \global\advance\destcount by 1\relax
- \kern2.5ex\relax
- }\fi #1}\nobreak\vskip 6pt
- \everypar{\hskip-\parindent\everypar{}}}
-
-\outer\def\ssection #1.#2.{\penalty-500\bigskip
- \centerline{\sectionfont\def\.##1{{\twelvett##1}}
- \ifacro\vbox to 0pt{\kern-2.5ex\relax
- \ifpdftex\pdfdest num \destcount fitbh\relax
- \else\special{pdf: dest (\the\destcount) [ @thispage /FitBH @ypos ]}\fi
- \def\.##1{##1}\def\TeX{TeX}%
- \ifx\bkminfo\empty\def\sectitle{#1}\else\def\sectitle{#1 (\bkminfo)}\fi
- \ifpdftex\pdfoutline goto num \destcount count -#2 {\sectitle}\relax
- \else\special{pdf: outline 0 << /Title (\sectitle)
- /A << /S /GoTo /D (\the\destcount) >> >>}\fi
- \gdef\bkminfo{}%
+ \gdef\subsections{0}%
\global\advance\destcount by 1\relax
\kern2.5ex\relax
}\fi #1}\nobreak\vskip 6pt
@@ -235,11 +219,10 @@ is based on \.{CWEAVE}.}
@z
@x
-\def\runninghead{APPENDIX A --- {\tentt CWEB} FILE FORMAT}
\section Appendix A: Excerpts from a \.{CWEB} Program.
@y
-\def\runninghead{APPENDIX A --- {\tentt CWEB} FILE FORMAT}
-\ssection Appendix A: Excerpts from a \.{CWEB} Program.4.
+\def\subsections{4}
+\section Appendix A: Excerpts from a \.{CWEB} Program.
\subsection CWEB file format.
@z