unsmob_pitch -> Pitch::unsmob and related

[lilypond.git] / lily / music-sequence.cc

diff --git a/lily/music-sequence.cc b/lily/music-sequence.cc
index fea62f89d65f9499265c394526c59aaa0a4d9b7c..175119e097e1e9f22179b362eae482d055494bdb 100644 (file)
--- a/lily/music-sequence.cc
+++ b/lily/music-sequence.cc
@@ -86,7 +86,7 @@ SCM
 Music_sequence::event_chord_length_callback (SCM m)
 {
   Music *me = unsmob_music (m);
-  Duration *d = unsmob_duration (me->get_property ("duration"));
+  Duration *d = Duration::unsmob (me->get_property ("duration"));
   // Preset duration is used in chord repetitions.
   if (d)
     {
@@ -176,7 +176,7 @@ SCM
 Music_sequence::simultaneous_relative_callback (SCM music, SCM pitch)
 {
   Music *me = unsmob_music (music);
-  Pitch p = *unsmob_pitch (pitch);
+  Pitch p = *Pitch::unsmob (pitch);
   return music_list_to_relative (me->get_property ("elements"),
                                  p, false).smobbed_copy ();
 }
@@ -186,7 +186,7 @@ SCM
 Music_sequence::event_chord_relative_callback (SCM music, SCM pitch)
 {
   Music *me = unsmob_music (music);
-  Pitch p = *unsmob_pitch (pitch);
+  Pitch p = *Pitch::unsmob (pitch);
   return music_list_to_relative (me->get_property ("elements"),
                                  p, true).smobbed_copy ();
 }