*** empty log message ***

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

diff --git a/lily/piano-pedal-performer.cc b/lily/piano-pedal-performer.cc
index f9b1aca616ec35d5d419cc26e901548166a2357e..1dbdf10dcd69b21299679a335ec469ddc05cde69 100644 (file)
--- a/lily/piano-pedal-performer.cc
+++ b/lily/piano-pedal-performer.cc
@@ -24,7 +24,7 @@ class Piano_pedal_performer : public Performer
   };
 
 public:
-  TRANSLATOR_DECLARATIONS(Piano_pedal_performer);
+  TRANSLATOR_DECLARATIONS (Piano_pedal_performer);
   ~Piano_pedal_performer ();
   
 protected:
@@ -130,8 +130,8 @@ 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_property ("name") ,
-                         scm_makfrom0str (nm.to_str0())))
+         if (ly_c_equal_p (r->get_property ("name") ,
+                         scm_str2symbol (nm.to_str0())))
            {
              Direction d = to_dir (r->get_property ("span-direction"));
              p->req_l_drul_[d] = r;