]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/piano-pedal-bracket.cc
* scm/output-ps.scm (new-text): don't access t glyph for getting
[lilypond.git] / lily / piano-pedal-bracket.cc
index b0d87558e9879b225ecfcd6d5063556121fbbce0..e1c07623e4bf9193f61a76c11fa5ad5a7f02a9a6 100644 (file)
@@ -57,7 +57,7 @@ Piano_pedal_bracket::print (SCM smob)
            flare[d] = 0.0; 
        }
       
-      Interval ext   = b->extent (common,  X_AXIS);
+      Interval ext   = robust_relative_extent (b, common,  X_AXIS);
       span_points[d] = ext [broken[d] ?  RIGHT : LEFT];
     }
   while (flip (&d) != LEFT);
@@ -70,12 +70,11 @@ Piano_pedal_bracket::print (SCM smob)
     {
       height[LEFT] = 0;
       
-      Real padding = robust_scm2double (me->get_property ("if-text-padding"), 0);
+      Real padding = robust_scm2double (me->get_property ("bound-padding"), 0);
       
       span_points[LEFT] = padding
-       + textbit->extent (common, X_AXIS)[RIGHT];
+       + robust_relative_extent (textbit, common, X_AXIS)[RIGHT];
     }
-  
 
   Stencil m ;
   if (!span_points.is_empty () &&
@@ -97,4 +96,4 @@ Piano_pedal_bracket::print (SCM smob)
 ADD_INTERFACE (Piano_pedal_bracket,"piano-pedal-bracket-interface",
               "The bracket of the piano pedal.  It can be tuned through the regular "
               "bracket properties.",
-              "edge-height shorten-pair bracket-flare pedal-text");
+              "bound-padding edge-height shorten-pair bracket-flare pedal-text");