texlive[55372]

commits+ascherer at tug.org commits+ascherer at tug.org
Mon Jun 1 14:09:32 CEST 2020


Revision: 55372
          http://tug.org/svn/texlive?view=revision&revision=55372
Author:   ascherer
Date:     2020-06-01 14:09:31 +0200 (Mon, 01 Jun 2020)
Log Message:
-----------
[CWEB] Adapt 'pdfwebtocfront' to 'pwebmac' 4.5.2.

Modified Paths:
--------------
    trunk/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex

Modified: trunk/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex
===================================================================
--- trunk/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex	2020-06-01 09:19:05 UTC (rev 55371)
+++ trunk/Master/texmf-dist/tex/plain/cweb/cwebbin/pdfwebtocfront.tex	2020-06-01 12:09:31 UTC (rev 55372)
@@ -1,6 +1,6 @@
 % pdfwebtofront.tex
 % Code from knuth.drv in https://github.com/oberdiek/latex-tds
-% 2020/05/21 v1.0 by Andreas Scherer.
+% 2020/05/30 v1.1 by Andreas Scherer.
 %
 % This file is part of project https://github.com/ascherer/cwebbin
 % and may be distributed under the MIT License or the LaTeX Project
@@ -12,7 +12,7 @@
 %
 \ifx\detokenize\undefined\endinput\fi
 \def\contentsfile{\jobname.toc} % file that gets table of contents info
-\def\readcontents{\input \contentsfile}
+\newif\iftexmf\texmffalse % special toc treatment for TeX, Metafont, etc.
 \newread\testread
 \openin\testread=\contentsfile\relax
 \ifeof\testread % First run
@@ -31,7 +31,7 @@
       \let\end\relax
       \ORGcon
       % let's start with section '1', the 'Introduction'.
-      \ifx\undefined\grouptitle \mark{1} % WEB
+      \ifx\undefined\gdepth \mark{{{\tensy x}1}{Introduction}} % WEB
       \else \mark{{{\tensy x}1}0{Introduction}}\fi % CWEB
       \eject % set '\botmark' on TOC, hence '\topmark' on next page.
     \endgroup
@@ -48,19 +48,18 @@
     \csname N\endcsname
   }%
   % Special variant of the above for 'mf.web' and 'tex.web'.  They put
-  % their tables-of-contents on a sparce 'page 2' and start on page '3'.
+  % their tables-of-contents on a sparse 'page 2' and start on page '3'.
   \begingroup
-    \def\num{0}%
     \edef\x{\jobname}%
     \edef\y{\detokenize{tex}}%
-    \ifx\x\y \def\num{1}\else
+    \ifx\x\y \texmftrue\else
     \edef\y{\detokenize{mf}}%
-    \ifx\x\y \def\num{1}\else
+    \ifx\x\y \texmftrue\else
     \edef\y{\detokenize{pdftex}}%
-    \ifx\x\y \def\num{1}\else
+    \ifx\x\y \texmftrue\else
     \edef\y{\detokenize{xetex}}%
-    \ifx\x\y \def\num{1}\fi\fi\fi\fi
-  \expandafter\endgroup\ifnum\num=1 %
+    \ifx\x\y \texmftrue\fi\fi\fi\fi
+  \expandafter\endgroup\iftexmf %
     \def\contentspagenumber{2}%
     \let\ORGpageno\pageno
     \def\pageno{%



More information about the tex-live-commits mailing list.