Using v2.18.2.
Pierre

2016-01-29 12:14 GMT+01:00 Pierre Perol-Schneider <
[email protected]>:

> Hi List,
>
> I'd like to add glissandi to a group of notes except the last one.
> Here's the function:
>
> glissandi =
> #(define-music-function (parser location music) (ly:music?)
>   "Add a glissando to all but last note"
>   (let ((all-but-last-note (drop-right (ly:music-property music
> 'elements))))
>     (set!
>      (ly:music-property all-but-last-note 'articulations)
>         (cons (make-music 'GlissandoEvent)
>               (ly:music-property all-but-last-note 'articulations)))
>   music))
>
> \relative c' {
>   \glissandi { c d e f }
>   c
> }
>
> It seems that 'drop-right' is not the right procedure. What else should I
> use?
>
> Cheers,
> Pierre
>
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to