X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ffont-select.cc;h=a5445853f5d6a9bac61f6def8e275fad97590201;hb=3ead9c2be44a4f5bb6d32a776188931f7995048e;hp=7d0ea7c6e22c25ab7ac209dfc7594ac37b520f5b;hpb=2c22efe5a46a37065b10c3f51c5d7db00d07d318;p=lilypond.git diff --git a/lily/font-select.cc b/lily/font-select.cc index 7d0ea7c6e2..a5445853f5 100644 --- a/lily/font-select.cc +++ b/lily/font-select.cc @@ -3,10 +3,9 @@ source file of the GNU LilyPond music typesetter - (c) 2003--2005 Han-Wen Nienhuys + (c) 2003--2007 Han-Wen Nienhuys */ -#include #include "dimensions.hh" #include "all-font-metrics.hh" @@ -77,9 +76,7 @@ get_font_by_design_size (Output_def *layout, Real requested, #endif } else - { - fm = unsmob_metrics (scm_force (scm_c_vector_ref (font_vector, i))); - } + fm = unsmob_metrics (scm_force (scm_c_vector_ref (font_vector, i))); return find_scaled_font (layout, fm, requested / size); } @@ -114,21 +111,10 @@ select_encoded_font (Output_def *layout, SCM chain) #if HAVE_PANGO_FT2 if (scm_is_string (name) && is_pango_format_global) - { - return select_pango_font (layout, 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"));