Issue 4722 Introduce new markup-command draw-squiggle-line.

[lilypond.git] / input / regression / flags-straight-stockhausen-boulez.ly

diff --git a/input/regression/flags-straight-stockhausen-boulez.ly b/input/regression/flags-straight-stockhausen-boulez.ly
index 7bda48a5e0571a609e3c9b06c4b3072de7fc1c67..6440bb081ea8ca6534d38273a50d807e9e8ef69f 100644 (file)
--- a/input/regression/flags-straight-stockhausen-boulez.ly
+++ b/input/regression/flags-straight-stockhausen-boulez.ly
@@ -1,4 +1,4 @@
-\version "2.17.6"
+\version "2.19.22"
 
 \header {
 texidoc = "Flags can be drawn straight in the style used by
@@ -7,7 +7,7 @@ Stockhausen and Boulez.
 }
 
 
-stemLength = #(define-music-function (parser location length) (number?)
+stemLength = #(define-music-function (length) (number?)
   "Set the length of the next stem explicitly."
   #{
     \once \override Stem.length-fraction = #length
@@ -27,8 +27,7 @@ stemLength = #(define-music-function (parser location length) (number?)
          gis''8
          \stemNeutral
        } \stemLength #1.43 d'8 r16 
-       \stemLength #0.95
-       \acciaccatura c''8 
+       \acciaccatura { \stemLength #0.95 c''8 }
        \stemLength #1.25
        b'32 r
     \bar"|.|"