]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/auto-change-iterator.cc
* lily/musical-request.cc (music-duration-length,
[lilypond.git] / lily / auto-change-iterator.cc
index 74d345ee1470cbab47e9da292a9ce1d3eb855dfb..a2ab5be5e5af8f3f2f1cd3627ce3a6a0232aa0b7 100644 (file)
@@ -86,11 +86,14 @@ Auto_change_iterator::pending_pitch (Moment m) const
     {
       SCM muses = iter->get_pending_events (m);
       for (SCM s = muses; gh_pair_p (s); s=ly_cdr (s))
-       if (Note_req* nr = dynamic_cast<Note_req*> (unsmob_music (ly_car (s))))
-         {
-           ps.push (*unsmob_pitch (nr->get_mus_property ("pitch")));
-         }
-
+       {
+         Music * m = unsmob_music (ly_car (s));
+         if (m && m->is_mus_type ("note-event"))
+           {
+             ps.push (*unsmob_pitch (m->get_mus_property ("pitch")));
+           }
+       }
+      
       if (ps.size ())
        break;