+void
+Stem_engraver::listen_tuplet_span (Stream_event *ev)
+{
+ Direction dir = to_dir (ev->get_property ("span-direction"));
+ if (dir == START)
+ {
+ // set stem property if stem already exists
+ if (stem_)
+ stem_->set_property ("tuplet-start", SCM_BOOL_T);
+ tuplet_start_ = true; // stash the value for use in later creation
+ }
+}
+