- if (dur.dot_count ())
- {
- Item * d = new Item (get_property ("Dots"));
- Rhythmic_head::set_dots (note, d);
-
- if (dur.dot_count ()
- != gh_scm2int (d->get_grob_property ("dot-count")))
- d->set_grob_property ("dot-count", gh_int2scm (dur.dot_count ()));
-
- d->set_parent (note, Y_AXIS);
- announce_grob (d, SCM_EOL);
- dots_.push (d);
- }
-
-
- SCM scm_pitch = event->get_mus_property ("pitch");
- SCM proc = get_property ("tablatureFormat");
+ Duration dur = *unsmob_duration (event->get_property ("duration"));
+
+ SCM scm_pitch = event->get_property ("pitch");
+ SCM proc = get_property ("tablatureFormat");