1 |
diff -up ghostscript-8.64/Resource/Init/gs_init.ps.runlibfileifexists ghostscript-8.64/Resource/Init/gs_init.ps |
2 |
--- ghostscript-8.64/Resource/Init/gs_init.ps.runlibfileifexists 2009-01-08 09:17:18.000000000 +0000 |
3 |
+++ ghostscript-8.64/Resource/Init/gs_init.ps 2009-02-04 11:35:19.000000000 +0000 |
4 |
@@ -672,6 +672,14 @@ systemdict /internaldict dup .makeintern |
5 |
{ /undefinedfilename signalerror } |
6 |
ifelse |
7 |
} bind def |
8 |
+/runlibfileifexists |
9 |
+ { % We don't want to bind 'run' into this procedure, |
10 |
+ % since run may get redefined. |
11 |
+ findlibfile |
12 |
+ { exch pop /run .systemvar exec } |
13 |
+ { pop } |
14 |
+ ifelse |
15 |
+ } bind def |
16 |
/selectdevice |
17 |
{ finddevice setdevice .setdefaultscreen } bind def |
18 |
/signalerror % <object> <errorname> signalerror - |
19 |
@@ -840,6 +848,7 @@ userdict /.currentresourcefile //null pu |
20 |
} bind def |
21 |
% Temporarily substitute it for the real runlibfile. |
22 |
/.runlibfile /runlibfile load def |
23 |
+/.runlibfileifexists /runlibfileifexists load def |
24 |
/runlibfile /runlibfile0 load def |
25 |
|
26 |
% Create the error handling machinery. |