[EMAIL PROTECTED] writes:
> 
> Right now I've found some time to study the new \cueDuring command.
> Unfortunately, it is not very useful as currently implemented: It
> fails to handle the case where the same voice is needed without cues.
> 
> What's still missing is a command which makes
> 
>   \cueDuring #"clarinet" #1 { R1 }
> 
> expand to
> 
>   R1
> 
> In TeX I would say
> 
>   \def\noCues{
>     \def\cueDuring##1##2##3{##3}
>   }
> 
> Can you provide the equivalent Scheme code?


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))
        

-- 

 Han-Wen Nienhuys   |   [EMAIL PROTECTED]   |   http://www.xs4all.nl/~hanwen 



_______________________________________________
lilypond-devel mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to