You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
1.8 KiB
39 lines
1.8 KiB
diff --git a/Resource/Init/gs_dps.ps b/Resource/Init/gs_dps.ps |
|
index 00c14d5..2a6f4f3 100644 |
|
--- a/Resource/Init/gs_dps.ps |
|
+++ b/Resource/Init/gs_dps.ps |
|
@@ -117,7 +117,7 @@ |
|
.dicttomark readonly /localdicts exch put |
|
% localdicts is now defined in userdict. |
|
% Copy the definitions into systemdict. |
|
- localdicts { .forcedef } forall |
|
+ localdicts { .forcedef } executeonly forall |
|
% Set the user parameters. |
|
userparams readonly .setuserparams |
|
% Establish the initial gstate(s). |
|
diff --git a/Resource/Init/gs_fonts.ps b/Resource/Init/gs_fonts.ps |
|
index 4807f81..01eca35 100644 |
|
--- a/Resource/Init/gs_fonts.ps |
|
+++ b/Resource/Init/gs_fonts.ps |
|
@@ -1136,7 +1136,7 @@ $error /SubstituteFont { } put |
|
% Stack: fontdict |
|
} executeonly |
|
if pop % Stack: origfontname fontdirectory path |
|
- } |
|
+ } executeonly |
|
if pop pop % Stack: origfontname |
|
|
|
% The font definitely did not load correctly. |
|
diff --git a/Resource/Init/pdf_font.ps b/Resource/Init/pdf_font.ps |
|
index f1d1728..46408f9 100644 |
|
--- a/Resource/Init/pdf_font.ps |
|
+++ b/Resource/Init/pdf_font.ps |
|
@@ -692,7 +692,7 @@ currentdict end readonly def |
|
currentglobal exch dup gcheck setglobal |
|
dup /GlyphNames2Unicode 100 dict dup 4 1 roll .forceput |
|
3 2 roll setglobal |
|
- } if % font-res font-dict encoding|null font-info g2u |
|
+ } executeonly if % font-res font-dict encoding|null font-info g2u |
|
exch pop exch % font-res font-dict g2u encoding|null |
|
userdict /.lastToUnicode get % font-res font-dict g2u Encoding|null CMap |
|
.convert_ToUnicode-into-g2u % font-res font-dict
|
|
|