>>>>> "Peter" == Peter Chubb <[EMAIL PROTECTED]> writes:
Peter> On my quest for better MIDI, I'm trying to deal with
Peter> alterations on a turn. How do I look `inside' a markup
Peter> sequence?
Peter> What I've tried is:
(let* ((t (ly:music-property e 'text)))
(cond
((equal? t (markup #:line (#:flat)))
(set! alteration -1/2))
((equal? t (markup #:line (#:sharp)))
(set! alteration 1/2))))
Peter> but this never matches.
Turns out that the markup function adds an extra #:line -- so I need
to use (markup #:flat) which generates (markup #:line (#:flat))
--
Dr Peter Chubb http://www.gelato.unsw.edu.au peterc AT gelato.unsw.edu.au
http://www.ertos.nicta.com.au ERTOS within National ICT Australia
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user
