;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
(define-public (construct-chord root duration modifications)
" Build a chord on root using modifiers in MODIFICATIONS. NoteEvent
(define (sus-modifier pitches)
(remove-step (pitch-step (ly:make-pitch 0 2 0)) pitches))
-(define-public default-chord-modifier-list
+(define-safe-public default-chord-modifier-list
`((m . ,minor-modifier)
(min . ,minor-modifier)
(aug . , aug-modifier)