Proper loglevels: cmd-line option --loglevel=NONE/ERROR/WARN/BASIC/PROGRESS/DEBUG

[lilypond.git] / scm / define-note-names.scm

diff --git a/scm/define-note-names.scm b/scm/define-note-names.scm
index 1c8fef1df92f2d9bbe3ae5bd3fac407a4a003c6c..2d85a97ed36ec7a8a39ec1d2951aadf2353dc559 100644 (file)
--- 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))))