X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpart-combine-iterator.cc;h=caa6c73aa89c8e0d28abeb55dbdbcb140d41acae;hb=ae0484ae139f4de639f91e64a3788583e5f84d87;hp=fea8256ca16dda1710d80ebaec31d1a9440edc54;hpb=bd24b8ad63e7825f8e85cf772cd1a17b2a99b9dc;p=lilypond.git

diff --git a/lily/part-combine-iterator.cc b/lily/part-combine-iterator.cc
index fea8256ca1..caa6c73aa8 100644
--- a/lily/part-combine-iterator.cc
+++ b/lily/part-combine-iterator.cc
@@ -3,11 +3,11 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2004--2005 Han-Wen Nienhuys
+  (c) 2004--2006 Han-Wen Nienhuys
 */
 
 #include "context.hh"
-#include "event.hh"
+#include "music.hh"
 #include "music-sequence.hh"
 #include "lily-guile.hh"
 #include "warn.hh"
@@ -373,10 +373,10 @@ Part_combine_iterator::construct_children ()
     {
       SCM sym = ly_symbol2scm (*p);
       execute_pushpop_property (one, sym,
-				ly_symbol2scm ("direction"), scm_int2num (1));
+				ly_symbol2scm ("direction"), scm_from_int (1));
 
       execute_pushpop_property (two, sym,
-				ly_symbol2scm ("direction"), scm_int2num (-1));
+				ly_symbol2scm ("direction"), scm_from_int (-1));
     }
 }
 
@@ -410,8 +410,8 @@ Part_combine_iterator::process (Moment m)
 	solo2 ();
       else if (scm_is_symbol (tag))
 	{
-	  String s = "Unknown split directive: "
-	    + (scm_is_symbol (tag) ? ly_symbol2string (tag) : String ("not a symbol"));
+	  string s = "Unknown split directive: "
+	    + (scm_is_symbol (tag) ? ly_symbol2string (tag) : string ("not a symbol"));
 	  programming_error (s);
 	}
     }
@@ -426,7 +426,7 @@ Part_combine_iterator::process (Moment m)
   if (second_iter_->ok ())
     {
       second_iter_->process (m);
-      if (first_iter_->try_music_in_children (busy_playing_event))
+      if (second_iter_->try_music_in_children (busy_playing_event))
 	last_playing_ = SOLO2;
     }
 }