From 452a08ec331b437454f1d4607c963254bccd1235 Mon Sep 17 00:00:00 2001 From: Patrick McCarty Date: Sun, 5 Jul 2009 12:47:01 -0700 Subject: [PATCH] Return a null string after calling ly:warning - This is needed to ensure a sane value for an undefined stencil expression. --- scm/backend-library.scm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/scm/backend-library.scm b/scm/backend-library.scm index 71ef9096f8..db79c74aae 100644 --- a/scm/backend-library.scm +++ b/scm/backend-library.scm @@ -192,9 +192,11 @@ (define-public (backend-testing output-module) (define (missing-stencil-expression name) - (apply - (if (ly:get-option 'warning-as-error) ly:error ly:warning) - (list (_ "missing stencil expression `~S'") name))) + (begin + (apply + (if (ly:get-option 'warning-as-error) ly:error ly:warning) + (list (_ "missing stencil expression `~S'") name)) + "")) (map (lambda (x) (if (not (module-defined? output-module x)) -- 2.39.5