[gs-cvs] gs/lib

[Raph Levien]

Update of /cvs/ghostscript/gs/lib
In directory casper:/tmp/cvs-serv1240/lib

Modified Files:
	gs_init.ps pdf_draw.ps 
Log Message:
Adds -dDONTPS command line option to disable processing of DoPS
directives in PDF files. Works around problem rendering
S2_Digitalproof-Forum_x3k.pdf.


Index: gs_init.ps
===================================================================
RCS file: /cvs/ghostscript/gs/lib/gs_init.ps,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -d -r1.64 -r1.65
--- gs_init.ps	18 Sep 2002 16:58:01 -0000	1.64
+++ gs_init.ps	29 Sep 2002 17:38:43 -0000	1.65
@@ -122,6 +122,7 @@
 currentdict /NOPLATFONTS known   /NOPLATFONTS exch def
 currentdict /NOPROMPT known   /NOPROMPT exch def
 currentdict /NOTRANSPARENCY known   /NOTRANSPARENCY exch def
+currentdict /DONTPS known   /DONTPS exch def
 % The default value of ORIENT1 is true, not false.
 currentdict /ORIENT1 known not { /ORIENT1 true def } if
 currentdict /OSTACKPRINT known   /OSTACKPRINT exch def

Index: pdf_draw.ps
===================================================================
RCS file: /cvs/ghostscript/gs/lib/pdf_draw.ps,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -d -r1.53 -r1.54
--- pdf_draw.ps	26 Sep 2002 05:26:32 -0000	1.53
+++ pdf_draw.ps	29 Sep 2002 17:38:43 -0000	1.54
@@ -922,7 +922,7 @@
 } bdef
 
 /DoPS {
-  true resolvestream cvx exec
+  DONTPS { pop } { true resolvestream cvx exec } ifelse
 } bdef
 
 drawopdict begin