* lily/lily-guile.cc (alist_to_hashq): new function

[lilypond.git] / lily / figured-bass-engraver.cc

diff --git a/lily/figured-bass-engraver.cc b/lily/figured-bass-engraver.cc
index dacd7ad8679755f9c06e777458a3de2be0d5c6f4..cd4fe0c22f39175bf7ffa45fa133c0515c7f59a9 100644 (file)
--- a/lily/figured-bass-engraver.cc
+++ b/lily/figured-bass-engraver.cc
@@ -3,7 +3,7 @@ figured-bass-engraver.cc --  implement Figured_bass_engraver
 
 source file of the GNU LilyPond music typesetter
 
-(c) 2002, 2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+(c)  2002--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 
  */
 
@@ -68,7 +68,7 @@ Figured_bass_engraver::process_music ()
 {
   if (rest_req_)
     {
-      figure_ = new Item (get_property ("BassFigure"));
+      figure_ = make_item ("BassFigure");
       announce_grob(figure_, rest_req_->self_scm()); // todo
       figure_->set_grob_property ("text" , scm_makfrom0str ("-"));
     }
@@ -84,7 +84,7 @@ Figured_bass_engraver::process_music ()
 
          SCM markup = scm_call_2 (proc, l, daddy_trans_->self_scm ());
 
-         figure_ = new Item (get_property ("BassFigure"));
+         figure_ = make_item ("BassFigure");
          figure_->set_grob_property ("text", markup);
          announce_grob(figure_, figures_[0]->self_scm()); // todo
        }