File ghostscript-8.60-cmap.dif of Package ghostscript-library
--- lib/gs_res.ps
+++ lib/gs_res.ps 2005-06-21 18:29:31.848342000 +0200
@@ -281,19 +281,26 @@ systemdict begin
% - .default_resource_dir <string>
/.default_resource_dir {
- .file_name_parent .file_name_directory_separator concatstrings
- (Resource) concatstrings
- /LIBPATH .systemvar {
- dup .file_name_current eq {
- pop
- } {
- 1 index false .file_name_combine {
- exch pop exit
+ (CMap) findlibfile {
+ closefile (CMap) search {
+ exch pop exch pop
+ } if
+ } {
+ pop % (CMap)
+ .file_name_parent .file_name_directory_separator concatstrings
+ (Resource) concatstrings
+ /LIBPATH .systemvar {
+ dup .file_name_current eq {
+ pop
} {
- pop pop
+ 1 index false .file_name_combine {
+ exch pop exit
+ } {
+ pop pop
+ } ifelse
} ifelse
- } ifelse
- } forall
+ } forall
+ } ifelse
} bind def
% <path> <name> <string> .resource_dir_name <path> <name> <string>