Commit | Line | Data |
---|---|---|
edfbed5e MC |
1 | % Copyright (C) 2007 Free Software Foundation, Inc. |
2 | ||
3 | % This file is part of GNU Emacs. | |
4 | ||
5 | % GNU Emacs is free software; you can redistribute it and/or modify | |
6 | % it under the terms of the GNU General Public License as published by | |
7 | % the Free Software Foundation; either version 3, or (at your option) | |
8 | % any later version. | |
9 | ||
10 | % GNU Emacs is distributed in the hope that it will be useful, | |
11 | % but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 | % GNU General Public License for more details. | |
14 | ||
15 | % You should have received a copy of the GNU General Public License | |
16 | % along with GNU Emacs; see the file COPYING. If not, write to | |
17 | % the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, | |
18 | % Boston, MA 02110-1301, USA. | |
19 | ||
20 | % This file defines `\pdflayout': | |
21 | % - \pdflayout=(0) is A4 portrait, | |
22 | % - \pdflayout=(1) is letter (US) portrait, | |
23 | % - \pdflayout=(0l) is A4 landscape. | |
24 | % - \pdflayout=(1l) is letter (US) landscape, | |
25 | ||
26 | \input ifpdf.sty | |
27 | ||
28 | \ifpdf | |
29 | \def\pdflayout=(#1#2){ | |
30 | \if0#1 % A4 | |
31 | \pdfpagewidth=21cm | |
32 | \pdfpageheight=29.7cm | |
33 | \else\if1#1 % Letter | |
34 | \pdfpagewidth=8.5in | |
35 | \pdfpageheight=11in | |
36 | \fi\fi | |
37 | \if l#2 % Landscape | |
38 | \edef\oldwidth{\the\pdfpagewidth} | |
39 | \pdfpagewidth=\pdfpageheight | |
40 | \pdfpageheight=\oldwidth | |
41 | \fi | |
42 | } | |
43 | \else | |
44 | \def\pdflayout=(#1#2){} | |
45 | \fi | |
46 | ||
47 | % archtag: 63c938a5-cc78-4964-962d-603c90d34afc | |
37840380 MB |
48 | |
49 | % arch-tag: 3464d27c-1439-473a-bc47-a7c501e8c156 |