(LY_DEFINE): use Scheme style naming for

[lilypond.git] / lily / piano-pedal-performer.cc

diff --git a/lily/piano-pedal-performer.cc b/lily/piano-pedal-performer.cc
index 3ec96a9d490e6989d69c7f55e2537177e8bf889f..f9b1aca616ec35d5d419cc26e901548166a2357e 100644 (file)
--- a/lily/piano-pedal-performer.cc
+++ b/lily/piano-pedal-performer.cc
@@ -130,10 +130,10 @@ Piano_pedal_performer::try_music (Music* r)
       for (Pedal_info*p = info_alist_; p->name_; p ++)
        {
          String nm = p->name_ + String ("Event");
-         if (gh_equal_p (r->get_mus_property ("name") ,
+         if (gh_equal_p (r->get_property ("name") ,
                          scm_makfrom0str (nm.to_str0())))
            {
-             Direction d = to_dir (r->get_mus_property ("span-direction"));
+             Direction d = to_dir (r->get_property ("span-direction"));
              p->req_l_drul_[d] = r;
              return true;
            }