X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-note-names.scm;h=2d85a97ed36ec7a8a39ec1d2951aadf2353dc559;hb=f875ef39c544bd3499dae5360e9e24f69933575f;hp=1647a34b49d40cdfa1d665686f56f188ca38f8b0;hpb=55ac733b69643a6bc6a83b706c65cb56efd388ef;p=lilypond.git

diff --git a/scm/define-note-names.scm b/scm/define-note-names.scm
index 1647a34b49..2d85a97ed3 100644
--- a/scm/define-note-names.scm
+++ b/scm/define-note-names.scm
@@ -965,8 +965,7 @@
 			  '())))
     (if (pair? alist)
 	(begin
-	  (if (ly:get-option 'verbose)
-	      (ly:message (_ "Using `~a' note names...") str))
+	  (ly:debug (_ "Using `~a' note names...") str)
 	  (set! pitchnames alist)
 	  (ly:parser-set-note-names parser alist))
-	(ly:warning (_ "Could not find language `~a'. Ignoring.") str))))
+	(ly:warning (_ "Could not find language `~a'.  Ignoring.") str))))