X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fsequential-music-iterator.cc;h=f933df7bb43330d82351adf8fae1bd8283444196;hb=c27e721652915aaa668e256e3a25b7bae533802e;hp=6b019e7861d2fd5323ed179e067a6daa735644e7;hpb=d765f3af45be51f15da55cf570a4b172200e1035;p=lilypond.git

diff --git a/lily/sequential-music-iterator.cc b/lily/sequential-music-iterator.cc
index 6b019e7861..f933df7bb4 100644
--- a/lily/sequential-music-iterator.cc
+++ b/lily/sequential-music-iterator.cc
@@ -1,41 +1,20 @@
 /*
-  Sequential_music_iterator.cc -- implement Sequential_music_iterator
+  sequential-music-iterator.cc -- implement Sequential_music_iterator
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
-#include "translator-group.hh"
-#include "warn.hh"
+#include "context.hh"
 #include "sequential-music-iterator.hh"
-#include "music-list.hh"
-
-/*
-  move to context of child iterator if it is deeper down in the
-  hierarchy.
-  */
-void
-Sequential_music_iterator::descend_to_child ()
-{
-  Translator_group  * child_report = child_report = iter_->report_to ();
-  Translator_group * me_report = report_to ();
-
-  Translator_group * c = child_report;
-  while (c && c != me_report)
-    {
-      c= c->daddy_trans_;
-    }
-  
-  if (c == me_report)
-    set_translator (child_report);
-}
-
+#include "music.hh"
+#include "warn.hh"
 
 IMPLEMENT_CTOR_CALLBACK (Sequential_music_iterator);
 
 SCM
-Sequential_music_iterator::get_music_list()const
+Sequential_music_iterator::get_music_list ()const
 {
-  return dynamic_cast<Music_sequence const*> (get_music ())->music_list ();
+  return get_music ()->get_property ("elements");
 }