X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fevent-listener-output.ly;h=58eb5440d20a482ad9fc76f240eb7fdf8640a79b;hb=89ba9ef67ab5618660965c67bcd2bf0b813738f5;hp=38c096093605cd4bf9ac0d97b6f809158211b5b9;hpb=72fb864be8e82de810b25a6f39f3f460b7f2b78f;p=lilypond.git

diff --git a/input/regression/event-listener-output.ly b/input/regression/event-listener-output.ly
index 38c0960936..58eb5440d2 100644
--- a/input/regression/event-listener-output.ly
+++ b/input/regression/event-listener-output.ly
@@ -1,4 +1,4 @@
-\version "2.14.0"
+\version "2.19.22"
 
 \header {
   texidoc = "Music events can be extracted from a score with event
@@ -15,30 +15,30 @@ 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
 
   a4\f d fis8-. a-. r4
   d16(\downbow cis b a) g4 \breathe e8\p( g) fis4 |
 
-  e4\< g8 fis g4-_\mp\>
+  e4\< \glissando g8 fis g4-_\mp\>
     \st "III"
     b8-_\startTextSpan a-_\stopTextSpan
     b4\p\<( d8 cis) d4(-. fis8-.^"II" e-.^"II")