#include "warn.hh"
void
-Change_iterator::error (std::string reason)
+Change_iterator::error (string reason)
{
- std::string to_type = ly_symbol2string (get_music ()->get_property ("change-to-type"));
- std::string to_id = ly_scm2string (get_music ()->get_property ("change-to-id"));
+ string to_type = ly_symbol2string (get_music ()->get_property ("change-to-type"));
+ string to_id = ly_scm2string (get_music ()->get_property ("change-to-id"));
- std::string warn1 = _f ("can't change `%s' to `%s'", to_type, to_id)
+ string warn1 = _f ("can't change `%s' to `%s'", to_type, to_id)
+ ": " + reason;
/*
GUHG!
*/
- std::string warn2= "Change_iterator::process (): "
+ string warn2= "Change_iterator::process (): "
+ get_outlet ()->context_name () + " = `"
+ get_outlet ()->id_string () + "': ";
warning (warn2);
Context *last = 0;
SCM to_type = get_music ()->get_property ("change-to-type");
- std::string to_id = ly_scm2string (get_music ()->get_property ("change-to-id"));
+ string to_id = ly_scm2string (get_music ()->get_property ("change-to-id"));
/* find the type of translator that we're changing.
if (current && current->id_string () == to_id)
{
- std::string msg;
+ string msg;
msg += _f ("can't change, already in translator: %s", to_id);
}
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. */
last->translator_id_string () = get_change
()->change_to_id_string (); */
- error (_f ("not changing to same context type: %s", to_type));
+ error (_f ("not changing to same context type: %s", ly_symbol2string (to_type).c_str ()));
}
else
/* FIXME: uncomprehensable message */