Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
58ce180d
Commit
58ce180d
authored
Mar 15, 2000
by
Gerd Moellmann
Browse files
Eliminate CheckConfig.
parent
66e63857
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
29 deletions
+5
-29
etc/ps-prin1.ps
etc/ps-prin1.ps
+1
-23
etc/ps-prin3.ps
etc/ps-prin3.ps
+4
-6
No files found.
etc/ps-prin1.ps
View file @
58ce180d
...
...
@@ -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
etc/ps-prin3.ps
View file @
58ce180d
% === 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
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment