release: 1.3.126

[lilypond.git] / input / test / pedal.ly

diff --git a/input/test/pedal.ly b/input/test/pedal.ly
index a30ab93a09f95894e0e3d8716092494ca3e1280a..840947a5b094d0dbb1d25925618f0f423f729a79 100644 (file)
--- a/input/test/pedal.ly
+++ b/input/test/pedal.ly
@@ -1,10 +1,18 @@
+\header{
+texidoc = "Piano pedal symbols merge stop and start.  The strings are configurable. ";
+}
+
+\version "1.3.120";
+
+
 \score{
 \context Staff \notes\relative c'{
-c4\sustaindown d e f\sustainup g\sustaindown b c
-c, [d16 \sustainup \sustaindown c  c c] [e e \sustainup \sustaindown e e ] f4 \sustainup g\sustaindown b c
-\property Staff.stopStartSustain = #"-P"
-\property Staff.startSustain = #"P"
-c,\sustainup\sustaindown d e f \sustainup g\sustaindown b c
+c4\sustainDown d e f\sustainUp g\sustainDown b c
+c, [d16 \sustainUp \sustainDown c  c c] [e e \sustainUp \sustainDown e e ] f4 \sustainUp g\sustainDown b c
+\property Staff.pedalSustainStrings = #'("-" "-P" "P")
+\property Staff.SustainPedal \override #'padding = #2
+c, \sustainUp\sustainDown d e f
+ \sustainUp g\sustainDown b c
 }
 \paper{
 }