- Scalar sh = get_property ("horizontalNoteShift", 0);
- if (sh.isnum_b ())
- {
- ncol_p_->set_elt_property (horizontal_shift_scm_sym,
- gh_int2scm (int (sh)));
- }
-
- sh = get_property ("forceHorizontalShift" ,0);
- if (sh.isnum_b ())
- {
- ncol_p_->set_elt_property (force_hshift_scm_sym,
- gh_double2scm (double (sh)));
- }
-