only print complaint if expect-error was set.

diff --git a/ly/init.ly b/ly/init.ly
index f6c928e301ec8f6e6af0cca07b2a89241b8f25cc..c3db3b37170810826995247621026c213d36379f 100644 (file)
--- a/ly/init.ly
+++ b/ly/init.ly
@@ -44,4 +44,5 @@
 
 #(if (eq? expect-error (ly:parser-has-error? parser))
   (ly:parser-clear-error parser)
-  (ly:parser-error parser (_ "expected error, but none found")))
+  (if expect-error
+   (ly:parser-error parser (_ "expected error, but none found"))))