From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Wed, 6 Apr 2005 12:27:56 +0000 (+0000)
Subject: * scm/framework-ps.scm (ps-font-command): use string-hash for
X-Git-Tag: release/2.5.19~45
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=4683b5716788837fb0bed12f7f0e12d4cf22ef78;p=lilypond.git

* scm/framework-ps.scm (ps-font-command): use string-hash for
hashing, to ensure that 11 and 18 are processed in Emmentaler-{11,18}

* scm/framework-ps.scm (munge-lily-font-name): new function
(write-preamble): hack: insert PFA equivalent of CFF into
.PS. This makes LilyPond output printable on normal PS printers
again.
---

diff --git a/scm/framework-ps.scm b/scm/framework-ps.scm
index 3a2e9db1f8..54a274701e 100644
--- a/scm/framework-ps.scm
+++ b/scm/framework-ps.scm
@@ -31,10 +31,6 @@
 (define-public (ps-font-command font)
   (let* ((name (munge-lily-font-name (ly:font-file-name font)))
 	 (magnify (ly:font-magnification font)))
-  (display font)
-  (display name)
-  (display magnify)
-  (newline)
 
     (string-append
      "magfont" (string-encode-integer (string-hash  name 1000000))