mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

Replace gs_languagelevel by languagelevel.

Browse source 
(DefOp): New proc.
This commit is contained in:
Gerd Moellmann 2000-03-30 13:26:37 +00:00
parent 6e1b1da607
commit 392a704f2b
1 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

11
etc/ps-prin0.ps
View file

@ -100,7 +100,7 @@
}ifelse
%%EndProcSet
gs_languagelevel 1 eq{ % operators for language level 2 only
languagelevel 1 eq{ % operators for language level 2 only
/<<{mark}bind def
/>>{counttomark 2 idiv dup dict begin{def}repeat pop currentdict end}bind def
/setpagedevice{pop}bind def
@ -109,10 +109,11 @@ gs_languagelevel 1 eq{ % operators for language level 2 only
% device dependent operators
/setduplexmode where{pop}
{/setduplexmode /duplexmode where{pop/duplexmode}{/pop}ifelse load def}ifelse
/DefOp{
dup where{pop pop pop}
{exch dup where{pop}{pop/pop}ifelse load def}ifelse}def
/settumble where{pop}
{/settumble /tumble where{pop/tumble}{/pop}ifelse load def}ifelse
/duplexmode /setduplexmode DefOp
/tumble /settumble DefOp
% === END ps-print prologue 0