;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
+;;;; (c) 1998--2001 Jan Nieuwenhuizen <janneke@gnu.org>
;;;; Han-Wen Nienhuys <hanwen@cs.uu.nl>
;; silly, use alist?
(define (find-notehead-symbol duration style)
(case style
- ((cross) "2cross")
+ ((xcircle) "2xcircle")
((harmonic) "0mensural")
((baroque)
(string-append (number->string duration)