input/regression/harp-pedals-tweaking.ly

   1 \version "2.11.65"
   2
   3 \header {
   4   texidoc = "Harp pedals can be tweaked through the size, thickness and
   5 harp-pedal-details properties of TextScript."
   6 }
   7
   8 \relative c'' {
   9   \override Voice.TextScript #'(harp-pedal-details box-width) = #1
  10   \once \override Voice.TextScript #'size = #1.5
  11   \once \override Voice.TextScript #'thickness = #7
  12   c1^\markup \harp-pedal #"o^ovo-|vovo-o^"
  13   c1^\markup \override #'(harp-pedal-details . (
  14                   (box-width . 0.6)
  15                   (box-height . 0.3)
  16                   (box-offset . 0.5)
  17                   (space-before-divider . 0.1)
  18                   (space-after-divider . 1.2))) {
  19            \harp-pedal #"o^ovo-|vovo-o^"}
  20   \revert Voice.TextScript #'(harp-pedal-details box-width)
  21   \override Voice.TextScript #'(harp-pedal-details circle-thickness) = #3
  22   \override Voice.TextScript #'(harp-pedal-details circle-x-padding) = #0.6
  23   \override Voice.TextScript #'(harp-pedal-details circle-y-padding) = #-0.3
  24   c1^\markup \harp-pedal #"o^ovo-|vovo-o^"
  25 }