* lily/font-interface.cc (get-font): take alist chain i.s.o. alist

[lilypond.git] / scm / bass-figure.scm

diff --git a/scm/bass-figure.scm b/scm/bass-figure.scm
index dee09c7391c41a178ab67c718a2530adce82693a..b6230ee53b784416d02de2cc826b4ab667a9f5e5 100644 (file)
--- a/scm/bass-figure.scm
+++ b/scm/bass-figure.scm
@@ -5,8 +5,12 @@
 (define (brew-one-figure grob fig-music)
   "Brew a single column for a music figure"
   (let* (
-        (mf (ly:get-font grob '( (font-family .  music)  )))
-        (nf (ly:get-font grob '( (font-family .  number)  )))
+        (mf (ly:get-font grob (cons  '((font-family . music))
+                                     Font_interface::get_property_alist_chain
+                                     )))
+        (nf (ly:get-font grob
+                         (cons  '((font-family . number))
+                                Font_interface::get_property_alist_chain)))
         (mol (ly:make-molecule  '() '(0 . 0) '(0 . 1.0)))
         (fig  (ly:get-mus-property fig-music 'figure))
         (acc  (ly:get-mus-property fig-music 'alteration))