]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/drum-note-performer.cc
(LY_DEFINE): use Scheme style naming for
[lilypond.git] / lily / drum-note-performer.cc
index dcbc4f3320c3c344cb2bb32105722f7843992352..b2fc142b4a51a79703063fea90fe883b87460fca 100644 (file)
@@ -36,7 +36,7 @@ Drum_note_performer::create_audio_elements ()
   while (note_evs_.size ())
     {
       Music* n = note_evs_.pop ();
-      SCM sym = n->get_mus_property ("drum-type");
+      SCM sym = n->get_property ("drum-type");
       SCM defn = SCM_EOL;
 
       if (gh_symbol_p (sym)