]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/change-iterator.cc
* lily/ various: Introduce stream events of types Prepare,
[lilypond.git] / lily / change-iterator.cc
index aef7567be0f74e1390b96c55e3b0438b6525b3ba..55099a855e4552cdeec205cad488e6ce86c33125 100644 (file)
@@ -74,8 +74,8 @@ Change_iterator::process (Moment m)
 
        if (dest)
          {
-           current->remove_context (last);
-           dest->add_context (last);
+           send_stream_event (last, "ChangeParent", get_music ()->origin (),
+                              ly_symbol2scm ("context"), dest->self_scm ());
          }
        else
          /* FIXME: constant error message.  */