]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dynamic-text-spanner.cc
* lily/dynamic-text-spanner.cc (print): add bound padding for edge
[lilypond.git] / lily / dynamic-text-spanner.cc
index 70d2bf446600f62808a11732c962339d9f306ef2..11de092ab34689a52a9b02cf79077f30b661b136 100644 (file)
@@ -121,11 +121,12 @@ Dynamic_text_spanner::print (SCM smob)
   do
     {
       Interval ext = edge[d].extent (X_AXIS);
+      Real pad = robust_scm2double (me->get_property ("bound-padding"), 0.0);      
       if (!ext.is_empty ())
        {
          edge[d].translate_axis (span_points[d], X_AXIS);
          m.add_stencil (edge[d]);
-         span_points[d] += -d *  ext[-d];
+         span_points[d] += -d *  (ext[-d] + pad);
        }
     }
   while (flip (&d) != LEFT);