Variables d'articulation

[JN-Daunay]

Bonjour,

Grace à la liste, j'ai défini il y a quelques années la variable suivante :

#(define (make-script x)
   (make-music 'ArticulationEvent
               'articulation-type x))

#(define (add-script m x)
 (if
   (equal? (ly:music-property m 'name) 'EventChord)
   (set! (ly:music-property m 'elements)
         (append (ly:music-property m 'elements)
                  (list (make-script x)))))
 m)

#(define (add-staccato m)
   (add-script m "staccato"))
addStacc =
#(define-music-function (parser location music) 
                                        (ly:music?)
                (music-map add-staccato music))


Je l'utilisais avec la version 2.14 de la façon suivante :
\addStacc {e f g a} à la place de e-. f-. g-. a-.

Cette variable ne fonctionne plus avec la version 2.18.
Que faut-il changer ?


Merci
Jean-Noël Daunay



--
View this message in context: 
http://lilypond-french-users.1298960.n2.nabble.com/Variables-d-articulation-tp7581887.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.