[gs-cvs] rev 8651 - trunk/gs/lib

[ray at ghostscript.com]

Author: ray
Date: 2008-04-19 11:26:31 -0700 (Sat, 19 Apr 2008)
New Revision: 8651

Modified:
   trunk/gs/lib/opdfread.ps
Log:
Fix a problem when the default transfer function of the target printer
is not in global space. Seen with Konica Minolta (QMS PostScript).
Fixes 'invalidaccess' error caused by attempting to store a 'local'
currentcolortransfer into a 'global' array. NB: The 'cp2g' will then
convert the array to global which is needed to store into InitialExtGState.


Modified: trunk/gs/lib/opdfread.ps
===================================================================
--- trunk/gs/lib/opdfread.ps	2008-04-19 18:18:34 UTC (rev 8650)
+++ trunk/gs/lib/opdfread.ps	2008-04-19 18:26:31 UTC (rev 8651)
@@ -269,7 +269,7 @@
 /InitialExtGState 20 dict begin
   /BG2 currentblackgeneration cp2g def
   /UCR2 currentundercolorremoval cp2g def
-  /TR2 [ currentcolortransfer ] cp2g def
+  /TR2 currentglobal false setglobal [ currentcolortransfer ] exch setglobal cp2g def
   /HT currenthalftone cp2g def
 currentdict end readonly def