X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fchord-entry.scm;h=45c395ba4e6081d929580f0450a1825bcf98102d;hb=8ca7c78d795e200ee3b57e43d6728c2a70520cc9;hp=1e3a034fd8a91d8b9d47c7665ef62ac1f6100e6d;hpb=d53a0536f899eae5f2e9c50e7b2e2b5636f5b026;p=lilypond.git

diff --git a/scm/chord-entry.scm b/scm/chord-entry.scm
index 1e3a034fd8..45c395ba4e 100644
--- a/scm/chord-entry.scm
+++ b/scm/chord-entry.scm
@@ -2,7 +2,7 @@
 ;;;;
 ;;;; source file of the GNU LilyPond music typesetter
 ;;;;
-;;;; (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; (c) 2004--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
 (define-public (construct-chord-elements root duration modifications)
   " Build a chord on root using modifiers in MODIFICATIONS. NoteEvents
@@ -12,7 +12,6 @@ Notes: natural 11 is left from chord if not explicitly specified.
 
 Entry point for the parser.
 "
-  (display modifications)
   (let* ((flat-mods (flatten-list modifications))
 	 (base-chord (stack-thirds (ly:make-pitch 0 4 0) the-canonical-chord))
 	 (complete-chord '())