''

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

diff --git a/input/regression/pedal.ly b/input/regression/pedal.ly
index 119f26a50d4dff9c0f24833662faea64cbc1563a..c9550ea2b2b6a0bb5f6c336e8dff69a213898571 100644 (file)
--- a/input/regression/pedal.ly
+++ b/input/regression/pedal.ly
@@ -1,7 +1,11 @@
 \version "1.5.38"
 \header{
 texidoc = "Piano pedal symbols merge stop and start.  The strings are configurable. 
-Text style, bracket style, and a mixture of both are supported.  "
+Text style, bracket style, and a mixture of both are supported.
+Brackets work  across line breaks.
+
+"
+
 }
 
 
@@ -10,24 +14,28 @@ Text style, bracket style, and a mixture of both are supported.  "
 \score{
 \context Staff \notes\relative c'{
 
-c4 d e f g
-\sustainDown b c
-c, [d16  c  c c] [e e \sustainUp \sustainDown e e ] f4 \sustainUp 
-g\sustainDown  b \sustainUp c 
-\property Staff.pedalSustainStrings = #'("-" "-P" "P")
-\property Staff.SustainPedal \override #'padding = #-2
-c, \sustainDown d e \sustainUp \sustainDown f
- \sustainUp g b c
+c4 d e f g 
+\sustainDown b c c, |
+  [d16  c  c c] [e e \sustainUp \sustainDown e e ] f4 \sustainUp
+    g\sustainDown |
+  b \sustainUp c 
+  \property Staff.pedalSustainStrings = #'("-" "-P" "P")
+  \property Staff.SustainPedal \override #'padding = #-2
+  c, \sustainDown d e \sustainUp \sustainDown f
+  \sustainUp g b 
+
+  \property Staff.UnaCordaPedal \override #'pedal-type = #'mixed
+  d \unaCorda e f g
+  \break
+   | b b b  \treCorde c |
+
 
 \property Staff.SustainPedal \override #'pedal-type = #'bracket
 
 c4 d e \sustainDown b c c, \sustainUp \sustainDown [d8 c] [e8 e \sustainUp \sustainDown] f4 d
 \sustainUp g \sustainDown b b, \sustainUp c'
+c4 
 
-\property Staff.UnaCordaPedal \override #'pedal-type = #'mixed
-
-c4 d \unaCorda e f g
- b \treCorde c
 
 
 }