summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMasamichi Hosoda <trueroad@trueroad.jp>2015-12-12 01:25:10 +0900
committerMasamichi Hosoda <trueroad@trueroad.jp>2015-12-28 20:55:56 +0900
commitbb215c0308a2f94278f5be2fbc1b8c28d16550de (patch)
tree571627baca4a2bc80d8f5d9590ecbb3a3aba607b
parentff9ca62acddb818b7788d7818a5c7eb0ddb6cdcb (diff)
Issue 4701/1: Fix `-dgs-load-fonts' option with non-Emmentaler music font
Using CFF-font test instead of internal-font test, non-Emmentaler CFF-font can be embedded.
-rw-r--r--scm/framework-ps.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index 60d7bb3fc0..b45a69d615 100644
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -272,7 +272,7 @@
(if (mac-font? bare-file-name)
(handle-mac-font name bare-file-name)
(cond
- ((internal-font? file-name)
+ ((and font (cff-font? font))
(ps-load-file (ly:find-file
(format #f "~a.otf" file-name))))
((string? bare-file-name)