release: 1.5.13

[lilypond.git] / lily / font-interface.cc

diff --git a/lily/font-interface.cc b/lily/font-interface.cc
index c50b4cb316be326c8f4f10eeb7fe345e9b0d5e18..ec7fa8ffa7af46a24297c5c74b998819cc93b357 100644 (file)
--- a/lily/font-interface.cc
+++ b/lily/font-interface.cc
@@ -200,7 +200,7 @@ Font_interface::properties_to_font_name (SCM fonts, SCM alist_chain)
 
   for (SCM s = fonts ; gh_pair_p (s); s = ly_cdr (s))
     {
-      SCM qlist = gh_caar (s);
+      SCM qlist = ly_caar (s);
 
       if (name != SCM_BOOL_F)
        {
@@ -231,7 +231,7 @@ Font_interface::properties_to_font_name (SCM fonts, SCM alist_chain)
        }
 
       
-      SCM qname = gh_cdar (s);
+      SCM qname = ly_cdar (s);
       return qname;
     }