X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Frequest-chord.cc;h=50835d2946374b66a2cdfd18bbcaa79a7d335dae;hb=f68bbd7a1ed1b0e7146bbbffcbcbb7f9c9bda3cc;hp=084042f021be6d18078bdf8c35162cab3ba81127;hpb=a2b44dbc67d57638f57754b4035e0f919aa46e93;p=lilypond.git

diff --git a/lily/request-chord.cc b/lily/request-chord.cc
index 084042f021..50835d2946 100644
--- 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"));