X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fchord-entry.scm;h=17735e6aca75057bb0b6b89eb8733c2ea7fa3977;hb=2b1527a2afb87ea838b3f3861de92302277986ed;hp=f1e040d54aa9605388f218b981a1bb955febd642;hpb=b7a0cffbf9d1069860368f289a5b50e9d1d90ba8;p=lilypond.git

diff --git a/scm/chord-entry.scm b/scm/chord-entry.scm
index f1e040d54a..17735e6aca 100644
--- a/scm/chord-entry.scm
+++ b/scm/chord-entry.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 2004--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; Copyright (C) 2004--2010 Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -47,7 +47,7 @@ Entry point for the parser.
 	    (set! bass (cadr mods))
 	    (set! mods (cddr mods))))
       (if (pair? mods)
-	  (scm-error 'chord-format "construct-chord" "Spurious garbage following chord: ~A" mods #f))
+	  (ly:warning (_ "Spurious garbage following chord: ~A") mods))
       chord)
 
     (define (interpret-removals	 chord mods)