]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/span-bar.cc
Uses the pure-from-neighbor-interface to calculate BarLine extra-spacing-height
[lilypond.git] / lily / span-bar.cc
index 0a46aa69798e1a0b5a1b80161aa774997f7ea4ee..d64b6ba87c8f227aadb79a332cce0e7c4db7e27b 100644 (file)
@@ -214,6 +214,18 @@ Span_bar::calc_glyph_name (SCM smob)
   return ly_string2scm (type);
 }
 
+void
+Span_bar::notify_grobs_of_my_existence (Grob *me)
+{
+  extract_grob_set (me, "elements", elts);
+  vector<Grob *> sortable (elts.begin (), elts.end ());
+  vector_sort (sortable, Grob::vertical_less);
+  for (vsize i = 0; i < sortable.size (); i++)
+    sortable[i]->set_property ("has-span-bar",
+                               scm_cons (scm_from_bool (i != 0),
+                                         scm_from_bool (i != sortable.size () - 1)));
+}
+
 Interval
 Span_bar::get_spanned_interval (Grob *me)
 {