From 5b73d5a6da063a36428b47addb477cf725674e2a Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Thu, 9 Nov 2006 14:44:41 +0100
Subject: [PATCH] remove font-magnification feature for non-Pango backends.
---
lily/font-select.cc | 11 +----------
1 file changed, 1 insertion(+), 10 deletions(-)
diff --git a/lily/font-select.cc b/lily/font-select.cc
index 6e040e75bb..2765aa8c14 100644
--- a/lily/font-select.cc
+++ b/lily/font-select.cc
@@ -114,16 +114,7 @@ select_encoded_font (Output_def *layout, SCM chain)
return select_pango_font (layout, chain);
else
#endif
- if (scm_is_string (name))
- {
- Real rmag
- = robust_scm2double (ly_chain_assoc_get (ly_symbol2scm ("font-magnification"), chain, SCM_BOOL_F),
- 1.0);
- Font_metric *fm = all_fonts_global->find_font (ly_scm2string (name));
-
- return find_scaled_font (layout, fm, rmag);
- }
- else if (scm_instance_p (name))
+ if (scm_instance_p (name))
{
SCM base_size = scm_slot_ref (name, ly_symbol2scm ("default-size"));
SCM vec = scm_slot_ref (name, ly_symbol2scm ("size-vector"));
--
2.39.5