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

[lpd at ghostscript.com]

Author: lpd
Date: 2006-09-12 20:18:02 -0700 (Tue, 12 Sep 2006)
New Revision: 7037

Modified:
   trunk/gs/lib/gs_init.ps
Log:
Fixes a minor logic bug relating to handleerror introduced by rev 6970.


Modified: trunk/gs/lib/gs_init.ps
===================================================================
--- trunk/gs/lib/gs_init.ps	2006-09-13 00:08:23 UTC (rev 7036)
+++ trunk/gs/lib/gs_init.ps	2006-09-13 03:18:02 UTC (rev 7037)
@@ -465,7 +465,7 @@
 % won't cause nested errors (Unexpected Error conditions).
 /handleerror
 	JOBSERVER {
-	  { //systemdict /.GShandleerror get .internalstopped pop } bind % always use .GShandleerror.
+	  { /.GShandleerror .systemvar .internalstopped pop } bind % always use .GShandleerror.
 	} {
 	  { /errordict .systemvar /handleerror get .internalstopped pop } bind % PLRM standard errorhandling
 	} ifelse def
@@ -950,7 +950,11 @@
        % Genoa issue of setting /handleerror, and then calling it, without an error
        % being set.  We were erroring in this case, due to /command load failing.
 
-       /errordict .systemvar /handleerror /.GShandleerror .systemvar ne
+        //JOBSERVER {
+	    /errordict .systemvar /handleerror get /.GShandleerror .systemvar ne
+	} {
+	    false
+	} ifelse
          { /errordict .systemvar begin /handleerror load .internalstopped pop end
          }
          if