From 7e5f149877e73517e97bee56e6bf1a5a118837e8 Mon Sep 17 00:00:00 2001 From: Martin Mares <mj@ucw.cz> Date: Fri, 1 Jul 2016 13:25:30 +0200 Subject: [PATCH] Scan: Do not fail if a font dictionary lacks /FontInfo This happens with SystemFont and SystemBoldFont on Xerox WC7845. --- scan/scan | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/scan/scan b/scan/scan index c74599a..d798332 100755 --- a/scan/scan +++ b/scan/scan @@ -310,14 +310,16 @@ sub scan_psfonts() { save exch findfont % Parse FontInfo and find version - dup /FontInfo get - (%K% /Version) = - dup /Version known { dup /Version get == } { - dup /version known { dup /version get == } { - (???) == + dup /FontInfo known { + dup /FontInfo get + (%K% /Version) = + dup /Version known { dup /Version get == } { + dup /version known { dup /version get == } { + (???) == + } ifelse } ifelse - } ifelse - pop + pop + } { } ifelse % Print Encoding (%K% /Encoding) = dup /Encoding known { dup /Encoding get == } { (???) == } ifelse -- GitLab