Hello.
Willing to have support for A5 paper in texinfo.tex,
I have written the following patch. As I am not a
TeXpert neither a texinfo expert, I would like to hear
the comments from other texinfo users about it. If
it looks good, maybe it would be integrated into
the texinfo distribution.
Note that @example and @lisp uses small fonts to make
better usage of the relatively small text width in A5
and try to acomodate without generating overfull hboxes.
The patches and version of the texinfo manual in
postscript format generated with this patch is temporarily
available at
ftp://urano.iceb.ufop.br/pub/texinfo/
so the interested reader can take a look at the output.
I have also produced a patch to texinfo.tex in order
to set smaller fonts. I also would like to hear any
comments on it.
I have tried to accomodate both Comuter Modern fonts
and PostScript fonts (at the same time) in texinfo.tex
by writing two macros, one for each set of fonts,
and allowing the user to select the font collection
by calling the apropriate macro. The default would be
the Computer Modern set. But this scheme does not
works. Any comments on that?
Thanks.
Romildo
--
Prof. Jos� Romildo Malaquias <[EMAIL PROTECTED]>
Departamento de Computa��o
Universidade Federal de Ouro Preto
Brasil
--- texinfo.tex.orig Sat Sep 25 11:31:21 1999
+++ texinfo.tex Sat Jul 1 14:44:45 2000
@@ -4214,8 +4214,18 @@
\def\smalllispx{\begingroup
\def\Esmalllisp{\nonfillfinish\endgroup}%
\def\Esmallexample{\nonfillfinish\endgroup}%
+ \def\Elisp{\nonfillfinish\endgroup}%
+ \def\Eexample{\nonfillfinish\endgroup}%
+ \smalllispy
+}
+
+\def\smalllispy{\begingroup
+ \nonfillstart
+ \let\Esmalllispy = \nonfillfinish
\smallfonts
- \lisp
+ \tt
+ \let\kbdfont = \kbdexamplefont % Allow @kbd to do something special.
+ \gobble % eat return
}
% @display: same as @lisp except keep current font.
@@ -5813,6 +5823,30 @@
\setleading{13.2pt}%
%
\internalpagesizes{#1}{\hsize}{\voffset}{\normaloffset}{\bindingoffset}{44pt}%
+}}
+
+% Use @afivepaper to print on European A5 paper.
+\def\afivepaper{{\globaldefs = 1
+ \setleading{12.5pt}%
+ \parskip = 2pt plus 1pt minus 0.1pt
+ %
+ \internalpagesizes{166mm}{120mm}{\voffset}{-8mm}{\bindingoffset}{8pt}%
+ %
+ \lispnarrowing = 0.2in
+ \tolerance = 800
+ \hfuzz = 1.2pt
+ \contentsrightmargin = 0mm
+ \deftypemargin = 0pt
+ \defbodyindent = 2mm
+ \tableindent = 12mm
+ %
+ \let\smalldisplay = \smalldisplayx
+ \let\smallexample = \smalllispx
+ \let\smallformat = \smallformatx
+ \let\smalllisp = \smalllispx
+ %
+ \let\example = \smalllispx
+ \let\lisp = \smalllispx
}}
% Set default to letter.
--- texinfo.tex.orig Sat Sep 25 11:31:21 1999
+++ texinfo.tex Sat Jul 1 11:57:11 2000
@@ -1032,9 +1032,9 @@
% We don't need math for this one.
\def\ttsl{\tenttsl}
-% Use Computer Modern fonts at \magstephalf (11pt).
+% Use Computer Modern fonts at \magstep0 (10pt).
\newcount\mainmagstep
-\mainmagstep=\magstephalf
+\mainmagstep=\magstep0
% Set the font macro #1 to the font named #2, adding on the
% specified font prefix (normally `cm').
@@ -1065,9 +1065,9 @@
\def\scbshape{csc}
\ifx\bigger\relax
-\let\mainmagstep=\magstep1
-\setfont\textrm\rmshape{12}{1000}
-\setfont\texttt\ttshape{12}{1000}
+\let\mainmagstep=\magstephalf
+\setfont\textrm\rmshape{11}{1000}
+\setfont\texttt\ttshape{11}{1000}
\else
\setfont\textrm\rmshape{10}{\mainmagstep}
\setfont\texttt\ttshape{10}{\mainmagstep}
