- */
- if (gh_string_p (s)) //&& ly_scm2string (s) != "hairpin")
- {
- cresc_p_->set_elt_property ("spanner", s);
- daddy_trans_l_->set_property (accepted_spanreqs_drul_[START]->span_type_str_
- + "Spanner", SCM_UNDEFINED);
- }
-
- cresc_p_->set_bound (LEFT, unsmob_element (get_property ("currentMusicalColumn")));
-
-
- /*
- We know how wide the text is, if we can be sure that the
- text already has relevant pointers into the paperdef,
- and it has its font-size property set.
-
- Since font-size may be set by a context higher up, we
- can not be sure of the size.