X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ffont-select.cc;h=5045a8276ebf4c460ec10e7c4e714c1b5cc17d2b;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=b38ff9268a29ba41e0d284386819c260db6e1971;hpb=0c14539bc83d6bb405141b6f21430b33d1e8fcf0;p=lilypond.git

diff --git a/lily/font-select.cc b/lily/font-select.cc
index b38ff9268a..5045a8276e 100644
--- a/lily/font-select.cc
+++ b/lily/font-select.cc
@@ -24,6 +24,7 @@
 #include "warn.hh"
 #include "pango-font.hh"
 #include "main.hh"
+#include "lily-imports.hh"
 
 Font_metric *
 get_font_by_design_size (Output_def *layout, Real requested,
@@ -103,8 +104,7 @@ get_font_by_mag_step (Output_def *layout, Real requested_step,
 SCM
 properties_to_font_size_family (SCM fonts, SCM alist_chain)
 {
-  return scm_call_2 (ly_lily_module_constant ("lookup-font"), fonts,
-                     alist_chain);
+  return Lily::lookup_font (fonts, alist_chain);
 }
 
 Font_metric *