- SCM head = scm_last_pair (info.grob_->get_property ("note-heads"));
- if (ly_c_pair_p (head))
- script_->set_parent (unsmob_grob (ly_car (head)), X_AXIS);
+ SCM head = scm_last_pair (info.grob ()->get_property ("note-heads"));
+ if (scm_is_pair (head))
+ {
+ script_->set_parent (unsmob_grob (scm_car (head)), X_AXIS);
+ script_->add_offset_callback (Self_alignment_interface::centered_on_parent_proc,
+ X_AXIS);
+
+ }
+ }
+
+ if (cresc_)
+ {
+ if (!cresc_->get_bound (LEFT))
+ {
+ cresc_->set_bound (LEFT, info.grob ());
+ add_bound_item (line_spanner_, cresc_->get_bound (LEFT));
+ }
+ }
+
+ if (finished_cresc_ && !finished_cresc_->get_bound (RIGHT))
+ {
+ finished_cresc_->set_bound (RIGHT, info.grob ());