Hi Alexander!

Here's a first shot. Please test thoroughly...

#(define (has-hyphen? event)
   (let* ((art (ly:music-property event 'articulations))
          (is-hyphen? (lambda (ev) (eq? (ly:music-property ev 'name) 
'HyphenEvent))))
      (find is-hyphen? art)))

[....]

Thanks a lot for that code. Works fine together with my 
0001-Better-lyric-extender-handling.patch.

cu,
 Knut

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to