From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 15 Mar 2000 13:39:10 +0000 (+0000)
Subject: Eliminate CheckConfig.
X-Git-Tag: emacs-pretest-21.0.90~4635
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=58ce180df9675c95c3bbd8f5c1fa35dd013a75b6;p=emacs.git

Eliminate CheckConfig.
---

diff --git a/etc/ps-prin1.ps b/etc/ps-prin1.ps
index e3401b1d2b7..a5bc1f44eae 100644
--- a/etc/ps-prin1.ps
+++ b/etc/ps-prin1.ps
@@ -389,9 +389,7 @@ StandardEncoding 46 82 getinterval aload pop
   /docState save def
   % ---- [andrewi] set PageSize based on chosen dimensions
   UseSetpagedevice{
-    0
-    {<< /PageSize [PageWidth LandscapePageHeight] >> setpagedevice}
-    CheckConfig
+    << /PageSize [PageWidth LandscapePageHeight] >> setpagedevice
   }{
     LandscapeMode{
       % ---- translate to bottom-right corner of Portrait page
@@ -695,24 +693,4 @@ StandardEncoding 46 82 getinterval aload pop
 % 3 cm 20 cm moveto  10 /Courier ReportFontInfo  showpage
 % 3 cm 20 cm moveto  ReportAllFontInfo           showpage
 
-/ErrorMessages
- [(This PostScript printer is not configured with this document page size.)
-  (Duplex printing is not supported on this PostScript printer.)]def
-
-% stack: error-index proc |- --
-/CheckConfig{
-  stopped{
-   1 cm LandscapePageHeight 0.5 mul moveto
-   /Courier findfont 10 scalefont setfont
-   gsave
-    (ps-print error:) show
-   grestore
-   0 -10 rmoveto
-   ErrorMessages exch get show
-   showpage
-   $error /newerror false put
-   stop
-  }if
-}bind def
-
 % === END ps-print prologue 1
diff --git a/etc/ps-prin3.ps b/etc/ps-prin3.ps
index c1da3503a78..9e916e81c44 100644
--- a/etc/ps-prin3.ps
+++ b/etc/ps-prin3.ps
@@ -1,14 +1,12 @@
 % === BEGIN ps-print prologue 3
 
 % --- duplex feature verification
-1
 UseSetpagedevice {
-  {<< /Duplex DuplexValue /Tumble TumbleValue >> setpagedevice}
+  << /Duplex DuplexValue /Tumble TumbleValue >> setpagedevice
 }{
-  {statusdict begin
-    DuplexValue setduplexmode TumbleValue settumble
-   end}
+  statusdict begin
+   DuplexValue setduplexmode TumbleValue settumble
+  end
 }ifelse
-CheckConfig
 
 % === END ps-print prologue 3