- dot_p_ = new Item (get_property ("basicDotsProperties"));
-
- Staff_symbol_referencer::set_interface (dot_p_);
- Rhythmic_head::set_dots (rest_p_, dot_p_);
- dot_p_->set_parent (rest_p_, Y_AXIS);
- dot_p_->add_offset_callback (Dots_quantised_position_callback_proc, Y_AXIS);
- dot_p_->set_elt_property ("dot-count",
- gh_int2scm (rest_req_l_->duration_.dots_i_));
- announce_element (dot_p_,0);
+ dot_ = make_item ("Dots", SCM_EOL);
+
+ Rhythmic_head::set_dots (rest_, dot_);
+ dot_->set_parent (rest_, Y_AXIS);
+ dot_->set_property ("dot-count", scm_from_int (dots));