- TODO: switch off ignoring empty stuff?
- */
- edge->set_extent_callback (Score_element::point_dimension_callback,X_AXIS);
-
- align_l_->set_elt_pointer ("group-center-element", edge->self_scm_);
-
- announce_element (Score_element_info(edge, 0));
- column_alist_ = scm_assoc_set_x (column_alist_, edge_sym, edge->self_scm_);
- }
-
- SCM s = scm_assoc (align_name, column_alist_);
-
- Item * group = 0;
-
- if (s != SCM_BOOL_F)
- {
- Score_element *e = unsmob_element (gh_cdr(s));
- group = dynamic_cast<Item*> (e);
- }
- else
- {
- group = new Item;
-
- Axis_group_interface (group).set_interface ();
- Axis_group_interface (group).set_axes (X_AXIS,X_AXIS);
-
- group->set_elt_property ("break-align-symbol", align_name);
- group->set_parent (align_l_, Y_AXIS);
- announce_element (Score_element_info (group, 0));
- column_alist_ = scm_assoc_set_x (column_alist_, align_name, group->self_scm_);
- }
- Axis_group_interface (group).add_element (item_l);