[EMAIL PROTECTED] writes: > > One of the options is to traverse all music expressions recursively, > > and set the music property #'quoted-events to '() if it is defined > > > > untested code: > > > > killCues = > > #(def-music-function > > (location music) (ly:music?) > > (music-map (lambda (mus) > > > > (set! (ly:music-property mus 'quoted-events '()) > > (set! (ly:music-property mus 'quoted-context-id '()) > > (set! (ly:music-property mus 'quoted-context-type '()) > > > > > > )) music)) > > Mhhm, this is indeed untested... I can't make it work :-) The number > of parentheses doesn't fit, and I couldn't find a combination which > doesn't give a Scheme error. > > Am I correct that it is to be used like this?
yup. See CVS for a better try. -- Han-Wen Nienhuys | [EMAIL PROTECTED] | http://www.xs4all.nl/~hanwen _______________________________________________ lilypond-devel mailing list [EMAIL PROTECTED] http://lists.gnu.org/mailman/listinfo/lilypond-devel
