X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ffont-select.cc;h=a5445853f5d6a9bac61f6def8e275fad97590201;hb=af99781b40aed8c6dedbd7d78f1a893355a98e09;hp=61030405fb7786ec9feb535b5fa5d5a901738374;hpb=108cf0e8c08c8e15e2a800feb161cfad9057daa8;p=lilypond.git diff --git a/lily/font-select.cc b/lily/font-select.cc index 61030405fb..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" @@ -115,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"));