From 507310b9197dba51c57a3a2de280c90d4f65d840 Mon Sep 17 00:00:00 2001 From: Masamichi Hosoda Date: Fri, 28 Oct 2016 23:14:32 +0900 Subject: [PATCH] Issue 4992/3: Add never-embed-font-list for Type 1 (PFA and PFB) fonts When you use `-dgs-never-embed-fonts` option, Ghostscript never embed Type 1 (PFA and PFB) fonts for PDF file output. --- scm/framework-ps.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm index 248b3ee0ac..a6465a02ee 100644 --- a/scm/framework-ps.scm +++ b/scm/framework-ps.scm @@ -402,7 +402,9 @@ (cond ((eq? font-format (string->symbol "Type 1")) ;; Type 1 (PFA and PFB) fonts - (ly:type1->pfa file-name)) + (begin (set! never-embed-font-list + (append never-embed-font-list (list name))) + (ly:type1->pfa file-name))) ((eq? font-format 'TrueType) ;; TrueType fonts (TTF) and TrueType Collection (TTC) (ly:ttf->pfa file-name font-index)) -- 2.39.5