From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sun, 8 May 2005 14:15:31 +0000 (+0000)
Subject: (write-preamble): embed CFFs if file name
X-Git-Tag: release/2.5.24~47
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=723b78f6f88ded33b833aff4ff4187a323b1689a;p=lilypond.git

(write-preamble): embed CFFs if file name
matches .otf
(write-preamble): warn about unknown fonts.
---

diff --git a/ChangeLog b/ChangeLog
index 299db84850..ff627d0ed5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,7 @@
 
 	* scm/framework-ps.scm (write-preamble): embed CFFs if file name
 	matches .otf
+	(write-preamble): warn about unknown fonts.
 
 	* lily/pfb.cc (Module): new function ly:otf->cff
 
diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index 9eeb6588a2..c361970767 100644
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -261,10 +261,8 @@
 	 (ps-embed-cff (ly:otf-font-table-data font "CFF ")
 		       name
 		       0))
-	(bare-file-name (cached-file-contents bare-file-name))
-	(cff-file-name  (cached-file-contents cff-file-name))
 	(else
-	 (ly:warning (_ "can't find CFF/PFA/PFB font ~S=~S" name file-name))
+	 (ly:warning (_ "Don't know how to embed ~S=~S" name file-name))
 	 (cons font-name "")))
        )))