Commits

youngs  committed d19533e

patch from Charles Hines <hines@gderome.com>

  • Participants
  • Parent commits de5759a

Comments (0)

Files changed (2)

+2000-10-28  Adrian Aichner  <adrian@xemacs.org>
+
+	* ps-print.el (ps-begin-file): Add Pagedevice definition for PS
+	language level > 1 so that printers select tray with paper of the
+	appropriate size.  Credit for this patch goes to
+	Charles Hines <hines@gderome.com>.
+
 1999-11-11  Andreas Jaeger  <aj@suse.de>
 
 	* ps-print.el: Check also emacs-major.
   (ps-output (format "/f2 %s /%s DefFont\n" ps-font-size ps-font-italic))
   (ps-output (format "/f3 %s /%s DefFont\n" ps-font-size ps-font-bold-italic))
 
+  ;; page device info
+  (ps-output (format
+              "
+%% Pagedevice definitions:
+languagelevel 1 gt {
+  <<
+    /Duplex %s /PageSize [%s %s]
+  >> setpagedevice\n} if
+"
+              (if ps-spool-duplex
+                  "true"
+                "false")
+              ps-page-width ps-page-height))
+
   (ps-output "\nBeginDoc\n\n")
   (ps-output "%%EndSetup\n")
 )