X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpart-combine-music.cc;h=91c351fc02fa07023c178592b894aa62c6fcc619;hb=8da6cef580cce3365b219f6aca429b434cb60fcf;hp=1375f8d06fddf8fdc16e949bee6b2557a99ad224;hpb=f579726b1c1fe56fe74a913a4438d11f283462b7;p=lilypond.git

diff --git a/lily/part-combine-music.cc b/lily/part-combine-music.cc
index 1375f8d06f..91c351fc02 100644
--- a/lily/part-combine-music.cc
+++ b/lily/part-combine-music.cc
@@ -8,6 +8,7 @@
  */
 
 #include "part-combine-music.hh"
+#include "part-combine-music-iterator.hh"
 #include "musical-pitch.hh"
 
 Part_combine_music::Part_combine_music (SCM  what, Music * f, Music * s)
@@ -20,7 +21,8 @@ Part_combine_music::Part_combine_music (SCM  what, Music * f, Music * s)
   scm_unprotect_object (f->self_scm());
   scm_unprotect_object (s->self_scm());  
 
-  set_mus_property ("type", ly_symbol2scm ("part-combined-music"));
+  set_mus_property ("type",
+		    Part_combine_music_iterator::constructor_cxx_function);
 }
 
 void