patch::: 1.5.11.jcn2

[lilypond.git] / lily / request-chord.cc

diff --git a/lily/request-chord.cc b/lily/request-chord.cc
index 084042f021be6d18078bdf8c35162cab3ba81127..50835d2946374b66a2cdfd18bbcaa79a7d335dae 100644 (file)
--- a/lily/request-chord.cc
+++ b/lily/request-chord.cc
@@ -21,9 +21,9 @@ Request_chord::Request_chord ()
 Pitch
 Request_chord::to_relative_octave (Pitch last)
 {
-  for (SCM s = music_list (); gh_pair_p (s);  s = gh_cdr (s))
+  for (SCM s = music_list (); gh_pair_p (s);  s = ly_cdr (s))
     {
-      Music * mus = unsmob_music (gh_car (s));
+      Music * mus = unsmob_music (ly_car (s));
       if (Melodic_req *m= dynamic_cast <Melodic_req *> (mus))
        {
          Pitch pit = *unsmob_pitch (m->get_mus_property ("pitch"));