texlive[55285] Build/source/texk/web2c/cwebdir: [CWEB] Fake headline

[commits+ascherer at tug.org]

Revision: 55285
          http://tug.org/svn/texlive?view=revision&revision=55285
Author:   ascherer
Date:     2020-05-26 16:53:18 +0200 (Tue, 26 May 2020)
Log Message:
-----------
[CWEB] Fake headline on page after TOC.

This works fine for all WEB programs, because they all start with
'section 1', and for 'make fullmanual' in CWEB, because all modules
(common, ctangle, cweave, ctwill) start with the 'Introduction'.
It is, however, not a general solution (yet).

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/cwebdir/ChangeLog
    trunk/Build/source/texk/web2c/cwebdir/texinputs/pdfwebtocfront.tex

Modified: trunk/Build/source/texk/web2c/cwebdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2020-05-26 13:45:50 UTC (rev 55284)
+++ trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2020-05-26 14:53:18 UTC (rev 55285)
@@ -1,3 +1,7 @@
+2020-05-26  Andreas Scherer  <https://ascherer.github.io>
+
+	* texinputs/pdfwebtocfront.tex: Fake headline on page after TOC.
+
 2020-05-23  Andreas Scherer  <https://ascherer.github.io>
 
 	* texinputs/pdfwebtocfront.tex: Add treatment for {pdf,xe}tex.web.

Modified: trunk/Build/source/texk/web2c/cwebdir/texinputs/pdfwebtocfront.tex
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/texinputs/pdfwebtocfront.tex	2020-05-26 13:45:50 UTC (rev 55284)
+++ trunk/Build/source/texk/web2c/cwebdir/texinputs/pdfwebtocfront.tex	2020-05-26 14:53:18 UTC (rev 55285)
@@ -17,10 +17,8 @@
 \openin\testread=\contentsfile\relax
 \ifeof\testread % First run
 \else % Second run
-  \let\ORGcon\con \let\ORGtoc\topofcontents
-  \ifx\undefined\grouptitle \mark{1} % WEB: let's start with section '1'.
-  \else\def\topofcontents{\ORGtoc\gtitle={\the\grouptitle}}\fi % CWEB
   % Redefine '\con' to be invoked before the first '\N' (starred section).
+  \let\ORGcon\con
   \def\con{%
     \def\:{\par\hangindent 2em} % Fix for 'bibtex.web'.
     % reduce size of PDF pages for more screen space
@@ -31,7 +29,11 @@
       \global\hoffset=-1.54cm \global\voffset=-1.54cm \fi
     \begingroup
       \let\end\relax
-      \ORGcon\eject
+      \ORGcon
+      % let's start with section '1', the 'Introduction'.
+      \ifx\undefined\grouptitle \mark{1} % WEB
+      \else \mark{{{\tensy x}1}0{Introduction}}\fi % CWEB
+      \eject % set '\botmark' on TOC, hence '\topmark' on next page.
     \endgroup
     \let\con\end
   }%