- align_l_ = new Break_align_item;
- align_l_->set_elt_property ("breakable", SCM_BOOL_T);
- announce_element (Score_element_info (align_l_,0));
+ align_ = make_item ("BreakAlignment", SCM_EOL);
+
+ Context *origin = inf.origin_contexts (this)[0];
+
+ Translator_group *tg = origin->implementation ();
+ Engraver *random_source = dynamic_cast<Engraver *> (unsmob_translator (scm_car (tg->get_simple_trans_list ())));
+
+ /*
+ Make left edge appear to come from same context as clef/bar-line etc.
+ */
+ left_edge_ = make_item_from_properties (random_source,
+ ly_symbol2scm ("LeftEdge"),
+ SCM_EOL,
+ "LeftEdge");
+ add_to_group (left_edge_->get_property ("break-align-symbol"),
+ left_edge_);