-
- /* Ugh, must be same as Text_spanner::print. */
-
- /*
- Ugh. property name is not general.
- */
- Real padding = gh_scm2double (me->get_property ("if-text-padding"));
+ Real padding = scm_to_double (me->get_property ("bound-padding"));
adjacent to a text-dynamic, and we may move closer. We
make the padding a little smaller, here.
*/
adjacent to a text-dynamic, and we may move closer. We
make the padding a little smaller, here.
*/
Stencil mol;
mol = Line_interface::line (me, Offset (0, starth), Offset (width, endh));
mol.add_stencil (Line_interface::line (me,
Stencil mol;
mol = Line_interface::line (me, Offset (0, starth), Offset (width, endh));
mol.add_stencil (Line_interface::line (me,
mol.translate_axis (x_points[LEFT]
- bounds[LEFT]->relative_coordinate (common, X_AXIS),
mol.translate_axis (x_points[LEFT]
- bounds[LEFT]->relative_coordinate (common, X_AXIS),
ADD_INTERFACE (Hairpin, "hairpin-interface",
"A hairpin (de)crescendo.",
ADD_INTERFACE (Hairpin, "hairpin-interface",
"A hairpin (de)crescendo.",