texlive[55726] Build/source/texk/web2c/cwebdir/cwebman-w2c.ch: [CWEB]
commits+ascherer at tug.org
commits+ascherer at tug.org
Thu Jul 2 19:45:28 CEST 2020
Revision: 55726
http://tug.org/svn/texlive?view=revision&revision=55726
Author: ascherer
Date: 2020-07-02 19:45:28 +0200 (Thu, 02 Jul 2020)
Log Message:
-----------
[CWEB] Macro simplification.
Modified Paths:
--------------
trunk/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch
Modified: trunk/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch 2020-07-02 11:21:53 UTC (rev 55725)
+++ trunk/Build/source/texk/web2c/cwebdir/cwebman-w2c.ch 2020-07-02 17:45:28 UTC (rev 55726)
@@ -65,6 +65,7 @@
\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
@@ -76,7 +77,7 @@
\gdef\bkminfo{}%
\global\advance\destcount by 1\relax
\kern2.5ex\relax
- }\fi \centerline{\sectionfont\def\.##1{{\twelvett##1}} #1}\nobreak\vskip 6pt
+ }\fi #1}\nobreak\vskip 6pt
\everypar{\hskip-\parindent\everypar{}}}
\def\appA{15}
@@ -84,18 +85,16 @@
\def\appC{17}
\def\Appendix#1{\leavevmode
- \ifnum\csname app#1\endcsname>0 %
- \ifacro\ifpdftex
- \pdfstartlink attr{/Border[0 0 0]} goto num\csname app#1\endcsname\relax
- \Blue\hbox{Appendix}~#1\Black
- \pdfendlink
- \else
- \setbox0=\hbox{\special{pdf: bc [ \pdflinkcolor ]}{\hbox{Appendix}~#1}%
- \special{pdf: ec}}\special{pdf: ann width \thewidth height \theheight
- depth \thedepth << /Type /Annot /Subtype /Link /Border [0 0 0]
- /A << /S /GoTo /D (\csname app#1\endcsname) >> >>}\box0\relax
- \fi\else Appendix~#1\fi
- \else Appendix~#1\fi}
+ \ifacro\ifpdftex
+ \pdfstartlink attr{/Border[0 0 0]} goto num\csname app#1\endcsname\relax
+ \Blue\hbox{Appendix}~#1\Black
+ \pdfendlink
+ \else
+ \setbox0=\hbox{\special{pdf: bc [ \pdflinkcolor ]}{\hbox{Appendix}~#1}%
+ \special{pdf: ec}}\special{pdf: ann width \thewidth height \theheight
+ depth \thedepth << /Type /Annot /Subtype /Link /Border [0 0 0]
+ /A << /S /GoTo /D (\csname app#1\endcsname) >> >>}\box0\relax
+ \fi\else Appendix~#1\fi}
\newcount\subdestcount \subdestcount=151\relax
More information about the tex-live-commits
mailing list.