Add tweaking the ellipse around harp pedals

[lilypond.git] / input / regression / harp-pedals-tweaking.ly

diff --git a/input/regression/harp-pedals-tweaking.ly b/input/regression/harp-pedals-tweaking.ly
index ed081b3aa59802c156946f6253fa9b8986ada16a..9c06e104a44932212d95adc3f03dd5a18a55a8d2 100644 (file)
--- a/input/regression/harp-pedals-tweaking.ly
+++ b/input/regression/harp-pedals-tweaking.ly
@@ -17,4 +17,9 @@ harp-pedal-details properties of TextScript."
                   (space-before-divider . 0.1)
                   (space-after-divider . 1.2))) {
            \harp-pedal #"o^ovo-|vovo-o^"}
+  \revert Voice.TextScript #'harp-pedal-details #'box-width
+  \override Voice.TextScript #'harp-pedal-details #'circle-thickness = #3
+  \override Voice.TextScript #'harp-pedal-details #'circle-x-padding = #0.6
+  \override Voice.TextScript #'harp-pedal-details #'circle-y-padding = #-0.3
+  c1^\markup \harp-pedal #"o^ovo-|vovo-o^"
 }