* scm/output-svg.scm:

[lilypond.git] / lily / extender-engraver.cc

diff --git a/lily/extender-engraver.cc b/lily/extender-engraver.cc
index 8f6ec784c1c0762a51caf0e929766348db1fc1bf..d163ac64864bf527350067d0efac182bcb8eea6b 100644 (file)
--- a/lily/extender-engraver.cc
+++ b/lily/extender-engraver.cc
@@ -122,7 +122,7 @@ completize_extender (Spanner *sp)
       SCM heads = sp->get_property ("heads");
       if (scm_is_pair (heads))
        {
-         Item *it = dynamic_cast<Item*> (unsmob_grob (ly_car (heads)));
+         Item *it = dynamic_cast<Item*> (unsmob_grob (scm_car (heads)));
          if (it)
            sp->set_bound (RIGHT, it);
        }
@@ -147,12 +147,12 @@ Extender_engraver::finalize ()
 
       if (!pending_extender_->get_bound (RIGHT))
        pending_extender_->warning (_ ("unterminated extender"));
-      pending_extender_ =0;
+      pending_extender_ = 0;
     }
 }
 
 
-ENTER_DESCRIPTION (Extender_engraver,
+ADD_TRANSLATOR (Extender_engraver,
 /* descr */       "Create lyric extenders",
 /* creats*/       "LyricExtender",
 /* accepts */     "extender-event",