X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-note-names.scm;h=fbef9183f8eb9f285b249c26f211367c86c71a72;hb=4bc2af1aa7038df7093ddfeb37f5622199b8fe91;hp=5d13b8c149d8a5a42c62839fa3863f8ec4672ab7;hpb=cdcb5b726073cb2d8d794146f0d128891ac81e7e;p=lilypond.git diff --git a/scm/define-note-names.scm b/scm/define-note-names.scm index 5d13b8c149..fbef9183f8 100644 --- a/scm/define-note-names.scm +++ b/scm/define-note-names.scm @@ -1,22 +1,22 @@ ;;;; Common note names in various languages. ;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; Copyright (C) 2010 Valentin Villenave et al: +;;;; Copyright (C) 2010--2012 Valentin Villenave et al: ;;;; -;;;; Copyright (C) 1996--2010 Han-Wen Nienhuys (Nederlands) -;;;; Copyright (C) 1998--2010 Jaume Obrador (Catalan) -;;;; Copyright (C) 1997--2010 Roland Meier +;;;; Copyright (C) 1996--2012 Han-Wen Nienhuys (Nederlands) +;;;; Copyright (C) 1998--2012 Jaume Obrador (Catalan) +;;;; Copyright (C) 1997--2012 Roland Meier ;;;; Bjoern Jacke (Deutsch) -;;;; Copyright (C) 1996--2010 Han-Wen Nienhuys (English) -;;;; Copyright (C) 2002--2010 Carlos García Suárez +;;;; Copyright (C) 1996--2012 Han-Wen Nienhuys (English) +;;;; Copyright (C) 2002--2012 Carlos García Suárez ;;;; Maximiliano G. G. (Espanol) -;;;; Copyright (C) 1998--2010 Paolo Zuliani +;;;; Copyright (C) 1998--2012 Paolo Zuliani ;;;; Eric Wurbel (Italiano) -;;;; Copyright (C) 1998--2010 Arvid Grøtting (Norsk) -;;;; Copyright (C) 2004--2010 Pedro Kröger (Portugues) -;;;; Copyright (C) 2001--2010 Heikki Junes (Suomi) -;;;; Copyright (C) 1997--2010 Mats Bengtsson (Svenska) -;;;; Copyright (C) 2004--2010 Hendrik Maryns (Vlaams) +;;;; Copyright (C) 1998--2012 Arvid Grøtting (Norsk) +;;;; Copyright (C) 2004--2012 Pedro Kröger (Portugues) +;;;; Copyright (C) 2001--2012 Heikki Junes (Suomi) +;;;; Copyright (C) 1997--2012 Mats Bengtsson (Svenska) +;;;; Copyright (C) 2004--2012 Hendrik Maryns (Vlaams) ;;;; ;;;; LilyPond is free software: you can redistribute it and/or modify ;;;; it under the terms of the GNU General Public License as published by @@ -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))))