lisp/desktop.el: Add workaround for bug#14949.
[emacs.git] / etc / refcards / pdflayout.sty
blobcacb891ad79690e516f4e9d8bb45ba70b97ba404
1 % Copyright (C) 2007-2013 Free Software Foundation, Inc.
3 % This file is part of GNU Emacs.
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 of the License, or
8 % (at your option) any later version.
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.
15 % You should have received a copy of the GNU General Public License
16 % along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
18 % This file defines `\pdflayout':
19 % - \pdflayout=(0) is A4 portrait,
20 % - \pdflayout=(1) is letter (US) portrait,
21 % - \pdflayout=(0l) is A4 landscape.
22 % - \pdflayout=(1l) is letter (US) landscape,
24 \input ifpdf.sty
26 \ifpdf
27 \def\pdflayout=(#1#2){
28 \if0#1 % A4
29 \pdfpagewidth=21cm
30 \pdfpageheight=29.7cm
31 \else\if1#1 % Letter
32 \pdfpagewidth=8.5in
33 \pdfpageheight=11in
34 \fi\fi
35 \if l#2 % Landscape
36 \edef\oldwidth{\the\pdfpagewidth}
37 \pdfpagewidth=\pdfpageheight
38 \pdfpageheight=\oldwidth
39 \fi
41 \else
42 \def\pdflayout=(#1#2){}
43 \fi