current/SOURCES/ghostscript-runlibfileifexists.patch

diff -up ghostscript-9.15/Resource/Init/gs_fonts.ps.runlibfileifexists ghostscript-9.15/Resource/Init/gs_fonts.ps
--- ghostscript-9.15/Resource/Init/gs_fonts.ps.runlibfileifexists       2014-09-22 11:17:33.000000000 +0100
+++ ghostscript-9.15/Resource/Init/gs_fonts.ps  2014-09-23 09:45:44.029511858 +0100
@@ -109,10 +109,19 @@ userdict /Fontmap .FontDirectory maxleng
       } if
       1 index type /stringtype eq
       1 index type /nametype eq and 1 index xcheck and
-      1 index /run eq 2 index /.runlibfile eq or and {
+      1 index /run eq 2 index /.runlibfile eq 3 index /.runlibfileifexists eq or or and {
                 % This is an inclusion entry.
-        pop findlibfile { exch pop } { file } ifelse
-        2 index exch .readFontmap pop
+        0 index /.runlibfileifexists eq {
+          pop findlibfile {
+            exch pop
+            2 index exch .readFontmap pop
+          } {
+            pop
+          } ifelse
+        } {
+          pop findlibfile { exch pop } { file } ifelse
+          2 index exch .readFontmap pop
+        } ifelse
       } {
                 % This is a real entry.
                 % Read and pop tokens until a semicolon.
diff -up ghostscript-9.15/Resource/Init/gs_init.ps.runlibfileifexists ghostscript-9.15/Resource/Init/gs_init.ps
--- ghostscript-9.15/Resource/Init/gs_init.ps.runlibfileifexists        2014-09-22 11:17:33.000000000 +0100
+++ ghostscript-9.15/Resource/Init/gs_init.ps   2014-09-23 09:45:44.030511863 +0100
@@ -684,6 +684,14 @@ systemdict /internaldict dup .makeintern
            { /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 -
@@ -852,6 +860,7 @@ userdict /.currentresourcefile //null pu
         } bind def
 % Temporarily substitute it for the real runlibfile.
 /.runlibfile /runlibfile load def
+/.runlibfileifexists /runlibfileifexists load def
 /runlibfile //runlibfile0 def
 currentdict /runlibfile0 .undef
 
1	luigiwalser	907481	diff -up ghostscript-9.15/Resource/Init/gs_fonts.ps.runlibfileifexists ghostscript-9.15/Resource/Init/gs_fonts.ps
2			--- ghostscript-9.15/Resource/Init/gs_fonts.ps.runlibfileifexists 2014-09-22 11:17:33.000000000 +0100
3			+++ ghostscript-9.15/Resource/Init/gs_fonts.ps 2014-09-23 09:45:44.029511858 +0100
4	luigiwalser	1386218	@@ -109,10 +109,19 @@ userdict /Fontmap .FontDirectory maxleng
5			} if
6	blino	292200	1 index type /stringtype eq
7			1 index type /nametype eq and 1 index xcheck and
8			- 1 index /run eq 2 index /.runlibfile eq or and {
9			+ 1 index /run eq 2 index /.runlibfile eq 3 index /.runlibfileifexists eq or or and {
10			% This is an inclusion entry.
11			- pop findlibfile { exch pop } { file } ifelse
12			- 2 index exch .readFontmap pop
13			+ 0 index /.runlibfileifexists eq {
14			+ pop findlibfile {
15			+ exch pop
16			+ 2 index exch .readFontmap pop
17			+ } {
18			+ pop
19			+ } ifelse
20			+ } {
21			+ pop findlibfile { exch pop } { file } ifelse
22			+ 2 index exch .readFontmap pop
23			+ } ifelse
24			} {
25			% This is a real entry.
26			% Read and pop tokens until a semicolon.
27	luigiwalser	907481	diff -up ghostscript-9.15/Resource/Init/gs_init.ps.runlibfileifexists ghostscript-9.15/Resource/Init/gs_init.ps
28			--- ghostscript-9.15/Resource/Init/gs_init.ps.runlibfileifexists 2014-09-22 11:17:33.000000000 +0100
29			+++ ghostscript-9.15/Resource/Init/gs_init.ps 2014-09-23 09:45:44.030511863 +0100
30			@@ -684,6 +684,14 @@ systemdict /internaldict dup .makeintern
31	fwang	143159	{ /undefinedfilename signalerror }
32			ifelse
33			} bind def
34	blino	19330	+/runlibfileifexists
35	blino	292200	+ { % We don't want to bind 'run' into this procedure,
36			+ % since run may get redefined.
37			+ findlibfile
38			+ { exch pop /run .systemvar exec }
39			+ { pop }
40			+ ifelse
41			+ } bind def
42	blino	19330	/selectdevice
43	fwang	143159	{ finddevice setdevice .setdefaultscreen } bind def
44	blino	19330	/signalerror % <object> <errorname> signalerror -
45	luigiwalser	907481	@@ -852,6 +860,7 @@ userdict /.currentresourcefile //null pu
46	fwang	143159	} bind def
47	blino	19330	% Temporarily substitute it for the real runlibfile.
48			/.runlibfile /runlibfile load def
49			+/.runlibfileifexists /runlibfileifexists load def
50	luigiwalser	1386218	/runlibfile //runlibfile0 def
51			currentdict /runlibfile0 .undef
52	blino	19330