From 9c27eb4661de7ac96a4dec84371769b112382bc2 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Sun, 11 Apr 2004 00:48:13 +0000 Subject: [PATCH] (define-fonts): Bugfix. --- ChangeLog | 2 ++ scm/output-ps.scm | 3 ++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index c438eed4cb..08d17f5b01 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,7 @@ 2004-04-11 Jan Nieuwenhuizen + * scm/output-ps.scm (define-fonts): Bugfix. + * lily/grob.cc: Add penalty to interface. * lily/include/paper-line.hh (class Paper_line): New member diff --git a/scm/output-ps.scm b/scm/output-ps.scm index 71e4a21464..7a1d8e03af 100644 --- a/scm/output-ps.scm +++ b/scm/output-ps.scm @@ -201,7 +201,8 @@ (font-encoding (assoc-get 'output-name coding-alist)) (command (font-command font)) ;; FIXME -- see (font-command ) - (plain (if font-encoding (get-coding-command font-encoding) + (plain (if font-encoding + (font-command font . (get-coding-command font-encoding)) command)) (designsize (ly:font-design-size font)) (magnification (* (ly:font-magnification font))) -- 2.39.2