]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/all-font-metrics-scheme.cc
Cosmetic changes to font files.
[lilypond.git] / lily / all-font-metrics-scheme.cc
index a3b19e468d2bf4ea6ad990bab60d55fa76fde6df..685ec537e6ef8c005dcd30efcfa6a70466342be5 100644 (file)
@@ -28,7 +28,8 @@ LY_DEFINE (ly_font_load, "ly:font-load", 1, 0, 0,
 {
   LY_ASSERT_TYPE (scm_is_string, name, 1);
   
-  Font_metric *fm = all_fonts_global->find_font (ly_scm2string (name));
+  string name_str = ly_scm2string (name);
+  Font_metric *fm = all_fonts_global->find_font (name_str);
 
   return fm->self_scm ();
 }