| 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.
|
Parent Directory
| 
Revision Log