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

[alexcher at ghostscript.com]

Author: alexcher
Date: 2006-11-16 08:45:12 -0800 (Thu, 16 Nov 2006)
New Revision: 7208

Modified:
   trunk/gs/lib/gs_dps2.ps
Log:
Return a read-only dictionary from currenthalftone.
Partial fix for CET 09-12-01.


Modified: trunk/gs/lib/gs_dps2.ps
===================================================================
--- trunk/gs/lib/gs_dps2.ps	2006-11-16 15:33:00 UTC (rev 7207)
+++ trunk/gs/lib/gs_dps2.ps	2006-11-16 16:45:12 UTC (rev 7208)
@@ -35,7 +35,7 @@
 	   { { exch pop }		% halftone
 	     { /HalftoneType 1		% screen
 		{ /Frequency /Angle /SpotFunction }
-	       .makestackdict
+	       .makestackdict readonly
 	     }
 	     { /HalftoneType 2		% colorscreen
 		{ /RedFrequency /RedAngle /RedSpotFunction
@@ -43,7 +43,7 @@
 		  /BlueFrequency /BlueAngle /BlueSpotFunction
 		  /GrayFrequency /GrayAngle /GraySpotFunction
 		}
-	       .makestackdict
+	       .makestackdict readonly
 	     }
 	   }
 	  exch get exec