]> git.donarmstrong.com Git - lilypond.git/commitdiff
Add display method for \bendAfter.
authorNeil Puttock <n.puttock@gmail.com>
Thu, 4 Mar 2010 21:43:11 +0000 (21:43 +0000)
committerNeil Puttock <n.puttock@gmail.com>
Thu, 4 Mar 2010 21:44:24 +0000 (21:44 +0000)
scm/define-music-display-methods.scm

index 469c65408adfa3da55ba4713c16499761d9e992d..0434ce8e59e52c704fd147fcaf08e0b28ddb0205 100644 (file)
     'ArticulationEvent
     'BeamEvent
     'BeamForbidEvent
+    'BendAfterEvent
     'CrescendoEvent
     'DecrescendoEvent
     'EpisemaEvent
 (define-post-event-display-method MultiMeasureTextEvent (event parser) #t
   (markup->lily-string (ly:music-property event 'text)))
 
+(define-post-event-display-method BendAfterEvent (event parser) #t
+  (format #f "\\bendAfter #~a" (ly:music-property event 'delta-step)))
+
 (define-post-event-display-method HarmonicEvent (event parser) #f "\\harmonic")
 (define-post-event-display-method GlissandoEvent (event parser) #t "\\glissando")
 (define-post-event-display-method ArpeggioEvent (event parser) #t "\\arpeggio")