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.
(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))