input/regression/harp-pedals-tweaking.ly

   1 \version "2.19.21"
   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 {
   9   \override Score.PaperColumn.keep-inside-line = ##f
  10   \override Voice.TextScript.harp-pedal-details.box-width = #1
  11   \once \override Voice.TextScript.size = #1.5
  12   \once \override Voice.TextScript.thickness = #7
  13   c''1^\markup \harp-pedal #"o^ovo-|vovo-o^"
  14   c1^\markup \override #'(harp-pedal-details . (
  15                   (box-width . 0.6)
  16                   (box-height . 0.3)
  17                   (box-offset . 0.5)
  18                   (space-before-divider . 0.1)
  19                   (space-after-divider . 1.2))) {
  20            \harp-pedal #"o^ovo-|vovo-o^"}
  21   \revert Voice.TextScript.harp-pedal-details.box-width
  22   \override Voice.TextScript.harp-pedal-details.circle-thickness = #3
  23   \override Voice.TextScript.harp-pedal-details.circle-x-padding = #0.6
  24   \override Voice.TextScript.harp-pedal-details.circle-y-padding = #-0.3
  25   c1^\markup \harp-pedal #"o^ovo-|vovo-o^"
  26 }