- Grob *d = unsmob_grob (me->get_object ("dot"));
- if (d && bt > 4) // UGH.
- {
- d->set_property ("staff-position",
- scm_from_int ((bt == 7) ? 4 : 3));
- }
- if (d && bt >= -1 && bt <= 1) // UGH again.
- {
- d->set_property ("staff-position",
- scm_from_int ((bt == 0) ? -1 : 1));
- }