summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps')
-rw-r--r--Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps10
1 files changed, 6 insertions, 4 deletions
diff --git a/Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps b/Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps
index a01afc23feb..2733ea3b14c 100644
--- a/Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps
+++ b/Master/tlpkg/tlgs/Resource/Init/gs_cmap.ps
@@ -1,4 +1,4 @@
-% Copyright (C) 2001-2018 Artifex Software, Inc.
+% Copyright (C) 2001-2019 Artifex Software, Inc.
% All Rights Reserved.
%
% This software is provided AS-IS with no warranty, either express or
@@ -74,7 +74,7 @@
CMap /WMode .knownget { /WMode exch def } if
/FontType 0 def
pop pop currentdict end
-} bind odef
+} bind executeonly odef
% composefont doesn't appear in CMap files -- it's documented in
% the "PostScript Language Reference Manual Supplement".
@@ -118,7 +118,7 @@
} bind def
/endcmap { % - endcmap -
- .rewriteTempMapsNotDef
+ //.rewriteTempMapsNotDef exec
CMAPDEBUG {
2 (*** undefined charmap ***)
@@ -539,11 +539,13 @@ dup /DefineResource {
} bind executeonly put
/Category defineresource pop
% We might have loaded CID font support already.
-/CIDInit /ProcSet 2 copy { findresource } .internalstopped
+/CIDInit /ProcSet 2 copy { findresource } //.internalstopped exec
% An interior `stopped' might have reset VM allocation to local.
//true .setglobal
{ pop pop 3 -1 roll }
{ dup length 4 index length add dict .copydict 4 -1 roll exch .copydict }
ifelse exch defineresource pop
+currentdict /.rewriteTempMapsNotDef .undef
+
.setlanguagelevel