(LY_DEFINE): use Scheme style naming for

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

diff --git a/lily/arpeggio-engraver.cc b/lily/arpeggio-engraver.cc
index cc61fb3b0f1461615345942d67caf2f9cac12961..6d3c7e2cb989f7504820029268bb46d87d22d871 100644 (file)
--- a/lily/arpeggio-engraver.cc
+++ b/lily/arpeggio-engraver.cc
@@ -71,7 +71,7 @@ Arpeggio_engraver::acknowledge_grob (Grob_info info)
        }
       else if (Note_column::has_interface (info.grob_ ))
        {
-         info.grob_->set_grob_property ("arpeggio", arpeggio_->self_scm ());
+         info.grob_->set_property ("arpeggio", arpeggio_->self_scm ());
        }
     }
 }