Mercurial > gnulib
comparison build-aux/texinfo.tex @ 6621:f6eb75a8eace
update from texinfo
| author | Karl Berry <karl@freefriends.org> |
|---|---|
| date | Fri, 27 Jan 2006 22:50:12 +0000 |
| parents | 98364b300a9f |
| children | 83cb78b2effd |
comparison
equal
deleted
inserted
replaced
| 6620:d01ba6cdaf9e | 6621:f6eb75a8eace |
|---|---|
| 1 % texinfo.tex -- TeX macros to handle Texinfo files. | 1 % texinfo.tex -- TeX macros to handle Texinfo files. |
| 2 % | 2 % |
| 3 % Load plain if necessary, i.e., if running under initex. | 3 % Load plain if necessary, i.e., if running under initex. |
| 4 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi | 4 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi |
| 5 % | 5 % |
| 6 \def\texinfoversion{2006-01-08.14} | 6 \def\texinfoversion{2006-01-27.14} |
| 7 % | 7 % |
| 8 % Copyright (C) 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, | 8 % Copyright (C) 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, |
| 9 % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free | 9 % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free |
| 10 % Software Foundation, Inc. | 10 % Software Foundation, Inc. |
| 11 % | 11 % |
| 4502 \setbox0 = \hbox{#4\enspace}% | 4502 \setbox0 = \hbox{#4\enspace}% |
| 4503 \def\toctype{num}% | 4503 \def\toctype{num}% |
| 4504 \gdef\thissection{#1}% | 4504 \gdef\thissection{#1}% |
| 4505 \fi\fi\fi | 4505 \fi\fi\fi |
| 4506 % | 4506 % |
| 4507 % Write the toc entry (before \donoderef). See comments in \chfplain. | 4507 % Write the toc entry (before \donoderef). See comments in \chapmacro. |
| 4508 \writetocentry{\toctype\sectionlevel}{#1}{#4}% | 4508 \writetocentry{\toctype\sectionlevel}{#1}{#4}% |
| 4509 % | 4509 % |
| 4510 % Write the node reference (= pdf destination for pdftex). | 4510 % Write the node reference (= pdf destination for pdftex). |
| 4511 % Again, see comments in \chfplain. | 4511 % Again, see comments in \chapmacro. |
| 4512 \donoderef{#3}% | 4512 \donoderef{#3}% |
| 4513 % | |
| 4514 % Interline glue will be inserted when the vbox is completed. | |
| 4515 % That glue will be a valid breakpoint for the page, since it'll be | |
| 4516 % preceded by a whatsit (usually from the \donoderef, or from the | |
| 4517 % \writetocentry if there was no node). We don't want to allow that | |
| 4518 % break, since then the whatsits could end up on page n while the | |
| 4519 % section is on page n+1, thus toc/etc. are wrong. Debian bug 276000. | |
| 4520 \nobreak | |
| 4513 % | 4521 % |
| 4514 % Output the actual section heading. | 4522 % Output the actual section heading. |
| 4515 \vbox{\hyphenpenalty=10000 \tolerance=5000 \parindent=0pt \raggedright | 4523 \vbox{\hyphenpenalty=10000 \tolerance=5000 \parindent=0pt \raggedright |
| 4516 \hangindent=\wd0 % zero if no section number | 4524 \hangindent=\wd0 % zero if no section number |
| 4517 \unhbox0 #1}% | 4525 \unhbox0 #1}% |
| 4571 \iflinks | 4579 \iflinks |
| 4572 {\atdummies | 4580 {\atdummies |
| 4573 \edef\temp{% | 4581 \edef\temp{% |
| 4574 \write\tocfile{@#1entry{#2}{#3}{\lastnode}{\noexpand\folio}}}% | 4582 \write\tocfile{@#1entry{#2}{#3}{\lastnode}{\noexpand\folio}}}% |
| 4575 \temp | 4583 \temp |
| 4576 } | 4584 }% |
| 4577 \fi | 4585 \fi |
| 4578 \fi | 4586 \fi |
| 4579 % | 4587 % |
| 4580 % Tell \shipout to create a pdf destination on each page, if we're | 4588 % Tell \shipout to create a pdf destination on each page, if we're |
| 4581 % writing pdf. These are used in the table of contents. We can't | 4589 % writing pdf. These are used in the table of contents. We can't |