X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdrum-note-performer.cc;h=e20d1da05d77851d655054acf6e2eff53e113b40;hb=4a964b10c411827584eb720c63cd0d6fc5b65d72;hp=50b8c3f9774b4892febb4eff48bdfed2b8de2a1c;hpb=94a1966c72301b8bd1d8bb3b8628c3f089d007cf;p=lilypond.git

diff --git a/lily/drum-note-performer.cc b/lily/drum-note-performer.cc
index 50b8c3f977..e20d1da05d 100644
--- a/lily/drum-note-performer.cc
+++ b/lily/drum-note-performer.cc
@@ -39,7 +39,7 @@ Drum_note_performer::create_audio_elements ()
       SCM sym = n->get_property ("drum-type");
       SCM defn = SCM_EOL;
 
-      if (ly_symbol_p (sym)
+      if (scm_is_symbol (sym)
 	  &&  (scm_hash_table_p (tab) == SCM_BOOL_T))
 	defn = scm_hashq_ref (tab, sym, SCM_EOL);