From 641523caae5f95691407e52d350ec6be833b6373 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Sun, 27 Nov 2022 04:11:08 +0000 Subject: gs: recover gs 9.56.1 git-svn-id: svn://tug.org/texlive/trunk@65113 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) (limited to 'Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps') diff --git a/Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps b/Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps index 1b1f852aa49..aaee616f4af 100644 --- a/Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps +++ b/Master/tlpkg/tlgs/Resource/Init/gs_fonts.ps @@ -1,4 +1,4 @@ -% Copyright (C) 2001-2022 Artifex Software, Inc. +% Copyright (C) 2001-2021 Artifex Software, Inc. % All Rights Reserved. % % This software is provided AS-IS with no warranty, either express or @@ -432,7 +432,6 @@ 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 @@ -930,14 +929,10 @@ 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 { - defaultfontname /None eq { /findfont cvx /invalidfont signalerror } if - pop defaultfontname - } if + 2 copy eq { pop defaultfontname } if //.checkalias exec QUIET not { SHORTERRORS { -- cgit v1.2.3