- note_p->set_grob_property ("staff-position", gh_int2scm (pos));
- announce_grob (note_p,req->self_scm ());
- note_p_arr_.push (note_p);
+ note->set_property ("staff-position", scm_int2num (pos));
+ notes_.push (note);
+ }
+
+ if (prev_notes_.size () == notes_.size ())
+ {
+ for (int i = 0; i < notes_.size (); i++)
+ {
+ Grob * p = make_spanner ("Tie", SCM_EOL);
+ Tie::set_interface (p); // cannot remove yet!
+
+ Tie::set_head (p, LEFT, prev_notes_[i]);
+ Tie::set_head (p, RIGHT, notes_[i]);
+
+ ties_.push (p);
+
+ }