current/SOURCES/ghostscript-runlibfileifexists.patch

--- ghostscript-9.04/Resource/Init/gs_init.ps.runlibfileifexists        2011-09-14 03:58:19.000000000 +0200
+++ ghostscript-9.04/Resource/Init/gs_init.ps   2011-09-14 03:58:30.000000000 +0200
@@ -674,6 +674,14 @@
            { /undefinedfilename signalerror }
           ifelse
         } bind def
+/runlibfileifexists
+       {               % We don't want to bind 'run' into this procedure,
+                       % since run may get redefined.
+         findlibfile
+          { exch pop /run .systemvar exec }
+          { pop }
+         ifelse
+       } bind def
 /selectdevice
         { finddevice setdevice .setdefaultscreen } bind def
 /signalerror           % <object> <errorname> signalerror -
@@ -842,6 +850,7 @@
         } bind def
 % Temporarily substitute it for the real runlibfile.
 /.runlibfile /runlibfile load def
+/.runlibfileifexists /runlibfileifexists load def
 /runlibfile /runlibfile0 load def
 
 % Create the error handling machinery.
1	--- ghostscript-9.04/Resource/Init/gs_init.ps.runlibfileifexists 2011-09-14 03:58:19.000000000 +0200
2	+++ ghostscript-9.04/Resource/Init/gs_init.ps 2011-09-14 03:58:30.000000000 +0200
3	@@ -674,6 +674,14 @@
4	{ /undefinedfilename signalerror }
5	ifelse
6	} bind def
7	+/runlibfileifexists
8	+ { % We don't want to bind 'run' into this procedure,
9	+ % since run may get redefined.
10	+ findlibfile
11	+ { exch pop /run .systemvar exec }
12	+ { pop }
13	+ ifelse
14	+ } bind def
15	/selectdevice
16	{ finddevice setdevice .setdefaultscreen } bind def
17	/signalerror % <object> <errorname> signalerror -
18	@@ -842,6 +850,7 @@
19	} bind def
20	% Temporarily substitute it for the real runlibfile.
21	/.runlibfile /runlibfile load def
22	+/.runlibfileifexists /runlibfileifexists load def
23	/runlibfile /runlibfile0 load def
24
25	% Create the error handling machinery.