X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fharp-pedals.ly;h=71e889c0a69f84cd5d2a2db1b55652506c296460;hb=d2762a4f1add2bb04d6fc34d3c7ae03eeb7d500f;hp=d78c88be46597f94352a002b0552b1acf0af89e0;hpb=37167c33a70c914334b6a4b5fec8eb5c6a62a555;p=lilypond.git

diff --git a/input/regression/harp-pedals.ly b/input/regression/harp-pedals.ly
index d78c88be46..71e889c0a6 100644
--- a/input/regression/harp-pedals.ly
+++ b/input/regression/harp-pedals.ly
@@ -1,4 +1,16 @@
-\version "2.11.56"
+\version "2.16.0"
+
+#(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.