summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2020-06-18 21:51:27 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2020-06-18 21:51:27 +0000
commit37d726af7e962b556d967f5c0e624b42ddd3b31a (patch)
tree41df093895b7a37eb8bbcf0923e484c071f94b4c /Build
parentfc2c3458c9a8ac0c91d5f8410df63adafcf78cbf (diff)
[CTWILL] Plain TeX doesn't reach '\fin' at all.
Standard 'ctwimac.tex' '\end's in '\inx' and skips '\fin' and '\con'. git-svn-id: svn://tug.org/texlive/trunk@55589 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r--Build/source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex13
1 files changed, 5 insertions, 8 deletions
diff --git a/Build/source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex b/Build/source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex
index 125ade020f4..ef0667a2167 100644
--- a/Build/source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex
+++ b/Build/source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex
@@ -24,8 +24,6 @@
\let\:=\. % preserve a way to get the dot accent
% (all other accents will still work as usual)
-\def\contentspagenumber{0} % default page number for table of contents
-
\newdimen\em \em=10pt % this "em" will not change with font size
\parskip 0pt plus .1pt % almost no stretch between paragraphs
\parindent 1\em % for paragraphs and for the first line of C text
@@ -641,6 +639,7 @@
\hsize=\pagewd \vsize=\maxdimen \output={\twillout}
+\def\contentspagenumber{0} % default page number for table of contents
\def\contentsfile{\jobname.toc} % file that gets table of contents info
\def\readcontents{\input \contentsfile}
\def\readsections{\input \jobname.scn}
@@ -655,11 +654,10 @@
\ifpdftex
\immediate\write\cont{\catcode `\noexpand\@=12\relax} % \makeatother
\immediate\closeout\cont % the contents information has been fully gathered
- \fi
-}
-\def\fin{\message{Section names:}
+ \fi}
+\def\fin{\ifacro message{Section names:}
\def\U##1.{} \def\Us##1.{} \let\I=\relax \let\*=*
- \ifacro \def\outsecname{Names of the sections}
+ \def\outsecname{Names of the sections}
\ifpdftex \makebookmarks
\pdfoutline goto num 1 count -\secno {\outsecname}
\def\X##1:##2\X{\firstsecno##1.%
@@ -670,8 +668,7 @@
{\toksF={}\makeoutlinetoks##2\outlinedone\outlinedone}%
\special{pdf: outline 0 << /Title (\the\toksE)
/A << /S /GoTo /D (\romannumeral\the\toksA) >> >>}}
- \fi\fi
- \readsections}
+ \fi \readsections \fi}
\def\makebookmarks{\let\ZZ=\writebookmarkline \readcontents\relax}
\def\writebookmarkline#1#2#3#4#5{{%
\let\(=\let \let\)=\let \let\[=\let \let\]=\let \let\/=\let