source file of the GNU LilyPond music typesetter
- (c) 1999--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 1999--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "context.hh"
#include "direction.hh"
#include "international.hh"
+#include "music.hh"
#include "music-wrapper-iterator.hh"
class Auto_change_iterator : public Music_wrapper_iterator
if (current && current->id_string () == to_id)
{
string msg;
- msg += _f ("can't change, already in translator: %s", to_id);
+ msg += _f ("cannot change, already in translator: %s", to_id);
}
if (current)
{
Context *dest
= it->get_outlet ()->find_create_context (to_type_sym, to_id, SCM_EOL);
- current->remove_context (last);
- dest->add_context (last);
+
+ send_stream_event (last, "ChangeParent", get_music ()->origin (),
+ ly_symbol2scm ("context"), dest->self_scm ());
}
else
{
Moment now = get_outlet ()->now_mom ();
Moment *splitm = 0;
+ if (start_moment_.main_part_.is_infinity () && start_moment_ < 0)
+ start_moment_ = now;
for (; scm_is_pair (split_list_); split_list_ = scm_cdr (split_list_))
{