]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/event-listener-output.ly
Doc: CSS: Add a maximum width for the sidebar in the manuals
[lilypond.git] / input / regression / event-listener-output.ly
index b7af7fb715e66b44a948625c4aafcee0dca6726e..58eb5440d20a482ad9fc76f240eb7fdf8640a79b 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.16.0"
+\version "2.19.22"
 
 \header {
   texidoc = "Music events can be extracted from a score with event
@@ -15,23 +15,23 @@ listeners."
 
 st =
 #(define-music-function
-  (parser location text)
+  (text)
   (string?)
 #{
-  \override TextSpanner #'(bound-details left text) = $text
+  \override TextSpanner.bound-details.left.text = $text
 #})
 
 
 vlnone = \new Staff {
   \set Staff.instrumentName = "violin-1"
   \set Staff.midiInstrument = "violin"
-  \override TextSpanner #'style = #'line
-  \override TextSpanner #'(bound-details right padding) = #-1
-  \override TextSpanner #'(bound-details left stencil-align-dir-y) =
+  \override TextSpanner.style = #'line
+  \override TextSpanner.bound-details.right.padding = #-1
+  \override TextSpanner.bound-details.left.stencil-align-dir-y =
     #CENTER
-  \override TextSpanner #'(bound-details right text) =
+  \override TextSpanner.bound-details.right.text =
     \markup { \draw-line #'(0 . -1) }
-\relative c' {
+\relative {
   \key d \major
   \tempo 4 = 96