]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/flags-straight-stockhausen-boulez.ly
Doc-es: various updates.
[lilypond.git] / input / regression / flags-straight-stockhausen-boulez.ly
index 8fc0d1245e3790ea31e4105fd03158330dd73cfb..6440bb081ea8ca6534d38273a50d807e9e8ef69f 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.16.0"
+\version "2.19.22"
 
 \header {
 texidoc = "Flags can be drawn straight in the style used by
@@ -7,18 +7,18 @@ 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
+    \once \override Stem.length-fraction = #length
   #}
 )
 
 {
     \autoBeamOff
     \time 3/8
-    \override Flag #'stencil = #modern-straight-flag
-    \override Stem #'length-fraction = #'1.5
+    \override Flag.stencil = #modern-straight-flag
+    \override Stem.length-fraction = #'1.5
     r8
     \acciaccatura {
          \stemDown
@@ -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"|.|"