-
- text_p_ = new Text_item;
- text_p_->set_elt_property ("breakable", SCM_BOOL_T); // ugh
- Group_interface (text_p_, "interfaces").add_thing (ly_symbol2scm ("Mark"));
- Side_position_interface staffside(text_p_);
- staffside.set_axis (Y_AXIS);
-
- SCM prop = get_property ("markDirection");
- if (!isdir_b (prop))
- {
- prop = gh_int2scm (UP);
- }
- text_p_->set_elt_property ("direction", prop);