summaryrefslogtreecommitdiff
path: root/dviware/dvipsconfig/config.usletter
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /dviware/dvipsconfig/config.usletter
Initial commit
Diffstat (limited to 'dviware/dvipsconfig/config.usletter')
-rw-r--r--dviware/dvipsconfig/config.usletter51
1 files changed, 51 insertions, 0 deletions
diff --git a/dviware/dvipsconfig/config.usletter b/dviware/dvipsconfig/config.usletter
new file mode 100644
index 0000000000..1a6876abbd
--- /dev/null
+++ b/dviware/dvipsconfig/config.usletter
@@ -0,0 +1,51 @@
+%!
+% config.usletter
+% Configuration and header file for dvips. Load with: dvips -P usletter
+%
+% Forces printing on US letter paper, if available.
+% Will be silently ignored by a PS level 1 PostScript interpreter.
+%
+% This file is built so it can be used both as the header file for
+% PostScript and as the configuration file for dvips.
+% (Note that dvips ignores any lines beginning with a space or a "%".)
+%
+% Copyright (C) 1995-2006 by Volker Kuhlmann.
+% Released under the terms of the GNU General Public License (GPL) Version 2.
+% See http://www.gnu.org/ for details.
+%
+% Volker Kuhlmann <VolkerKuhlmann@gmx.de>
+% 21 Feb 1995; 14, 16, 17, 26 Oct 1997; 25 Jan 1998; 9 Mar 2000
+%
+ /setpagedevice where
+ {
+ %dup { pstack flush pop pop } forall pstack flush
+ pop % remove dict name
+ % check whether pagedevice dict has /DeferredMediaSelection
+ % (gs 3.33 has setpagedevice, but error on /DeferredMediaSelection)
+ /hasDMS false def
+ currentpagedevice
+ {
+ /DeferredMediaSelection eq { /hasDMS true def } if
+ pop % throw value of key
+ } forall
+ hasDMS {
+ <<
+ /DeferredMediaSelection true % what exactly is this?
+ >>
+ setpagedevice
+ } if
+ <<
+ % /DeferredMediaSelection true % what exactly is this?
+ /PageSize [612 792] % size US letter portrait
+ /ImagingBBox null % set null after /PageSize
+ >>
+ setpagedevice
+ }
+ { }
+ ifelse
+%
+ { % start a procedure so PostScript `ignores' the dvips configuration part.
+h config.usletter
+ } pop % PostScript cleanup
+%
+% EOF config.usletter