Issue 5167/6: Changes: show \markup xxx = ... \etc assignments

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

diff --git a/input/regression/harp-pedals.ly b/input/regression/harp-pedals.ly
index 04af5a527119bbac3307c5b11f2e9265675ad5f3..471d9c20953c253bfb3813d5ede59262830822b7 100644 (file)
--- a/input/regression/harp-pedals.ly
+++ b/input/regression/harp-pedals.ly
@@ -1,4 +1,16 @@
-\version "2.11.57"
+\version "2.19.21"
+
+#(ly:set-option 'warning-as-error #f)
+#(ly:expect-warning (_ "Harp pedal diagram contains ~a pedals rather than the usual 7.") 0)
+#(ly:expect-warning (_ "Harp pedal diagram does not contain a divider (usually after third pedal)."))
+#(ly:expect-warning (_ "Harp pedal diagram contains ~a pedals rather than the usual 7.") 1)
+#(ly:expect-warning (_ "Harp pedal diagram does not contain a divider (usually after third pedal)."))
+#(ly:expect-warning (_ "Unhandled entry in harp-pedal: ~a" ) "a")
+#(ly:expect-warning (_ "Unhandled entry in harp-pedal: ~a" ) "s")
+#(ly:expect-warning (_ "Unhandled entry in harp-pedal: ~a" ) "d")
+#(ly:expect-warning (_ "Unhandled entry in harp-pedal: ~a" ) "f")
+#(ly:expect-warning (_ "Unhandled entry in harp-pedal: ~a" ) "x")
+
 
 \header {
   texidoc = "Basic harp diagram functionality, including circled pedal boxes. 
@@ -6,8 +18,8 @@ The third diagram uses an empty string, the third contains invalid characters.
 Both cases will create warnings, but should still not fail with an error."
 }
 
-\relative c'' {
-  c1^\markup \harp-pedal #"^v-|vv-^"
+\relative {
+  c''1^\markup \harp-pedal #"^v-|vv-^"
   % circled boxes:
   c1^\markup \harp-pedal #"o^ovo-|vovo-o^"
   % invalid pedal specifications, which still should be handled gracefully: