X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-note-names.scm;h=2d85a97ed36ec7a8a39ec1d2951aadf2353dc559;hb=a066a93ee74edebb9d238a1bac93c3bc7e8e6e4a;hp=5d13b8c149d8a5a42c62839fa3863f8ec4672ab7;hpb=75cdeeefba1e4762a29b5f418b8d6294a0eba18e;p=lilypond.git diff --git a/scm/define-note-names.scm b/scm/define-note-names.scm index 5d13b8c149..2d85a97ed3 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--2011 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--2011 Han-Wen Nienhuys (Nederlands) +;;;; Copyright (C) 1998--2011 Jaume Obrador (Catalan) +;;;; Copyright (C) 1997--2011 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--2011 Han-Wen Nienhuys (English) +;;;; Copyright (C) 2002--2011 Carlos García Suárez ;;;; Maximiliano G. G. (Espanol) -;;;; Copyright (C) 1998--2010 Paolo Zuliani +;;;; Copyright (C) 1998--2011 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--2011 Arvid Grøtting (Norsk) +;;;; Copyright (C) 2004--2011 Pedro Kröger (Portugues) +;;;; Copyright (C) 2001--2011 Heikki Junes (Suomi) +;;;; Copyright (C) 1997--2011 Mats Bengtsson (Svenska) +;;;; Copyright (C) 2004--2011 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))))