-/*
- TODO: this doesn't follow standard pattern. Regularize.
- */
-void
-Tie_column::add_tie (Grob*me,Grob *s)
-{
- if (s->get_parent (Y_AXIS)
- && Tie_column::has_interface (s->get_parent (Y_AXIS)))
- return ;
-
- if (! Pointer_group_interface::count (me, "ties"))
- {
- dynamic_cast<Spanner*> (me)->set_bound (LEFT, Tie::head (s,LEFT));
- dynamic_cast<Spanner*> (me)->set_bound (RIGHT, Tie::head (s,RIGHT));
- }
- s->set_parent (me, Y_AXIS);
- Pointer_group_interface::add_grob (me, ly_symbol2scm ("ties"), s);
- s->add_dependency (me);
-}