diff options
Diffstat (limited to 'Resource/Init/gs_fonts.ps')
| -rw-r--r-- | Resource/Init/gs_fonts.ps | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/Resource/Init/gs_fonts.ps b/Resource/Init/gs_fonts.ps index aaee616f..1b1f852a 100644 --- a/Resource/Init/gs_fonts.ps +++ b/Resource/Init/gs_fonts.ps @@ -1,4 +1,4 @@ -% Copyright (C) 2001-2021 Artifex Software, Inc. +% Copyright (C) 2001-2022 Artifex Software, Inc. % All Rights Reserved. % % This software is provided AS-IS with no warranty, either express or @@ -432,6 +432,7 @@ FONTPATH /FONTMAP where { dup /FONTMAP get /FONTMAP exch [ exch //.pathlist exec] put + /FONTMAP dup where pop exch get {/PermitFileReading exch .addcontrolpath} forall } if % Try to enumerate native fonts registered with the os @@ -929,10 +930,14 @@ FAKEFONTS not { (%END FAKEFONTS) .skipeof } if } if % No aliasing. % This mode is incompatible with high level devices. + defaultfontname /None eq { /findfont cvx /invalidfont signalerror } if cleartomark mark defaultfontname } { dup .substitutefont - 2 copy eq { pop defaultfontname } if + 2 copy eq { + defaultfontname /None eq { /findfont cvx /invalidfont signalerror } if + pop defaultfontname + } if //.checkalias exec QUIET not { SHORTERRORS { |