paper format for pdfTeX

[Werner LEMBERG]

I suggest the attached change to set the paper dimensions of pdfTeX
properly.  For the @pagesizes command, I simply add 1 inch to both the
text height and width.  Please adapt it to something better.


    Werner


======================================================================


--- texinfo.tex.old     Tue Mar 26 17:29:26 2002
+++ texinfo.tex Tue Apr 23 22:09:09 2002
@@ -3,7 +3,7 @@
 % Load plain if necessary, i.e., if running under initex.
 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
 %
-\def\texinfoversion{2002-03-26.08}
+\def\texinfoversion{2002-03-26.08-wl}
 %
 % Copyright (C) 1985, 86, 88, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99,
 %               2000, 01, 02 Free Software Foundation, Inc.
@@ -6058,11 +6058,12 @@
 }
 
 % Parameters in order: 1) textheight; 2) textwidth; 3) voffset;
-% 4) hoffset; 5) binding offset; 6) topskip.  We also call
-% \setleading{\textleading}, so the caller should define \textleading.
-% The caller should also set \parskip.
+% 4) hoffset; 5) binding offset; 6) topskip, 7) pdf pageheight;
+% 8) pdf pagewidth.  We also call \setleading{\textleading}, so
+% the caller should define \textleading.  The caller should also
+% set \parskip.
 %
-\def\internalpagesizes#1#2#3#4#5#6{%
+\def\internalpagesizes#1#2#3#4#5#6#7#8{%
   \voffset = #3\relax
   \topskip = #6\relax
   \splittopskip = \topskip
@@ -6085,6 +6086,11 @@
   %
   \parindent = \defaultparindent
   \setemergencystretch
+  %
+  \ifpdf
+    \pdfpageheight #7\relax
+    \pdfpagewidth #8\relax
+  \fi
 }
 
 % Use `small' versions.
@@ -6102,7 +6108,10 @@
   \textleading = 13.2pt
   %
   % If page is nothing but text, make it come out even.
-  
\internalpagesizes{46\baselineskip}{6in}{\voffset}{.25in}{\bindingoffset}{36pt}%
+  \internalpagesizes{46\baselineskip}{6in}%
+                    {\voffset}{.25in}%
+                    {\bindingoffset}{36pt}%
+                    {11in}{8.5in}%
 }}
 
 % Use @smallbook to reset parameters for 7x9.5 (or so) format.
@@ -6110,7 +6119,10 @@
   \parskip = 2pt plus 1pt
   \textleading = 12pt
   %
-  \internalpagesizes{7.5in}{5.in}{\voffset}{.25in}{\bindingoffset}{16pt}%
+  \internalpagesizes{7.5in}{5.in}%
+                    {\voffset}{.25in}%
+                    {\bindingoffset}{16pt}%
+                    {9.25in}{7in}%
   %
   \lispnarrowing = 0.3in
   \tolerance = 700
@@ -6126,7 +6138,10 @@
   \parskip = 3pt plus 2pt minus 1pt
   \textleading = 12pt
   %
-  
\internalpagesizes{53\baselineskip}{160mm}{\voffset}{4mm}{\bindingoffset}{44pt}%
+  \internalpagesizes{53\baselineskip}{160mm}%
+                    {\voffset}{4mm}%
+                    {\bindingoffset}{44pt}%
+                    {297mm}{210mm}%
   %
   \tolerance = 700
   \hfuzz = 1pt
@@ -6139,7 +6154,10 @@
   \parskip = 2pt plus 1pt minus 0.1pt
   \textleading = 12.5pt
   %
-  \internalpagesizes{166mm}{120mm}{\voffset}{-8mm}{\bindingoffset}{8pt}%
+  \internalpagesizes{166mm}{120mm}%
+                    {\voffset}{-8mm}%
+                    {\bindingoffset}{8pt}%
+                    {210mm}{148mm}%
   %
   \lispnarrowing = 0.2in
   \tolerance = 800
@@ -6158,7 +6176,10 @@
   \textleading = 13.6pt
   %
   \afourpaper
-  \internalpagesizes{237mm}{150mm}{3.6mm}{3.6mm}{3mm}{7mm}%
+  \internalpagesizes{237mm}{150mm}%
+                    {3.6mm}{3.6mm}%
+                    {3mm}{7mm}%
+                    {297mm}{210mm}%
   %
   % Must explicitly reset to 0 because we call \afourpaper, apparently,
   % although this does not entirely make sense.
@@ -6168,13 +6189,18 @@
 % Use @afourwide to print on European A4 paper in wide format.
 \def\afourwide{%
   \afourpaper
-  
\internalpagesizes{6.5in}{9.5in}{\hoffset}{\normaloffset}{\bindingoffset}{7mm}%
+  \internalpagesizes{6.5in}{9.5in}%
+                    {\hoffset}{\normaloffset}%
+                    {\bindingoffset}{7mm}%
+                    {297mm}{210mm}%
 }
 
 % @pagesizes TEXTHEIGHT[,TEXTWIDTH]
 % Perhaps we should allow setting the margins, \topskip, \parskip,
 % and/or leading, also. Or perhaps we should compute them somehow.
 %
+\newdimen \tempdima
+\newdimen \tempdimb
 \def\pagesizes{\parsearg\pagesizesxxx}
 \def\pagesizesxxx#1{\pagesizesyyy #1,,\finish}
 \def\pagesizesyyy#1,#2,#3\finish{{%
@@ -6184,7 +6210,14 @@
   \parskip = 3pt plus 2pt minus 1pt
   \setleading{\textleading}%
   %
-  
\internalpagesizes{#1}{\hsize}{\voffset}{\normaloffset}{\bindingoffset}{44pt}%
+  \tempdima #1\relax
+  \advance\tempdima by 1in
+  \tempdimb #2\relax
+  \advance\tempdimb by 1in
+  \internalpagesizes{#1}{\hsize}%
+                    {\voffset}{\normaloffset}%
+                    {\bindingoffset}{44pt}%
+                    {\tempdima}{\tempdimb}%
 }}
 
 % Set default to letter.