release commit

[lilypond.git] / lily / drum-note-engraver.cc

diff --git a/lily/drum-note-engraver.cc b/lily/drum-note-engraver.cc
index c66846137cd92aca52475a9af312ce9ed294b410..f4491965ad3d695a5297d6260d698dd5615212ac 100644 (file)
--- a/lily/drum-note-engraver.cc
+++ b/lily/drum-note-engraver.cc
@@ -90,9 +90,9 @@ Drum_notes_engraver::process_music ()
       
       if (scm_is_pair (defn))
        {
-         SCM pos = scm_caddr (defn);
-         SCM style =scm_car (defn);
-         SCM script = scm_cadr (defn);
+         SCM pos = ly_caddr (defn);
+         SCM style =ly_car (defn);
+         SCM script = ly_cadr (defn);
          
          if (scm_integer_p (pos) == SCM_BOOL_T)
            note->set_property ("staff-position", pos);