X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fevent-listener.ly;h=899d0825a3c9531a188a2079c355b24587edf253;hb=ee70161485a2d2f347db3e29724a943c741ef524;hp=72a3e2407d78d34ede21317c54b2c3410c2141cf;hpb=feb3b8dcc73b0d822990d79cb45ff2de27a57957;p=lilypond.git diff --git a/ly/event-listener.ly b/ly/event-listener.ly index 72a3e2407d..899d0825a3 100644 --- a/ly/event-listener.ly +++ b/ly/event-listener.ly @@ -151,6 +151,10 @@ as an engraver for convenience." (print-line engraver "breathe")) +#(define (format-glissando engraver event) + (print-line engraver + "gliss")) + #(define (format-tie engraver event) (print-line engraver "tie")) @@ -218,6 +222,7 @@ as an engraver for convenience." (crescendo-event . format-cresc) (decrescendo-event . format-decresc) (text-span-event . format-textspan) + (glissando-event . format-glissando) (tie-event . format-tie))) } }