+
+ if (events_[START] && slurs_.is_empty ())
+ {
+ Music *ev = events_[START];
+
+ bool double_slurs = to_boolean (get_property ("doubleSlurs"));
+
+ Grob * slur = make_spanner ("Slur", events_[START]->self_scm ());
+ Direction updown = to_dir (ev->get_property ("direction"));
+ if (updown && !double_slurs)
+ set_grob_direction (slur, updown);
+
+ slurs_.push (slur);
+
+ if (double_slurs)
+ {
+ set_grob_direction (slur, DOWN);
+ slur = make_spanner ("Slur", events_[START]->self_scm ());
+ set_grob_direction (slur, UP);
+ slurs_.push (slur);
+ }
+ }
+ set_melisma (slurs_.size ());