+
+ if (script_ && !script_->get_parent (X_AXIS))
+ {
+ script_->set_parent (i.grob_, X_AXIS);
+ }
+
+ }
+ else if (Script_interface::has_interface (i.grob_) && script_)
+ {
+ SCM p = i.grob_->get_grob_property ("script-priority");
+
+ /*
+ UGH.
+
+ DynamicText doesn't really have a script-priority field.
+ */
+ if (gh_number_p (p)
+ && gh_scm2int (p) < gh_scm2int (script_->get_grob_property ("script-priority")))
+ {
+ Side_position_interface::add_support (line_spanner_, i.grob_);
+
+ }