X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fchanging--flageolet-mark-size.ly;h=1a3fcffdc9c35289c33fe6c9ecfae6eb10ef3161;hb=a8c9e8a7ca320ab0df5fd32e717fd62cd7635ce6;hp=3f554f87c9209f85f4fda85dfac29fcd1cf81360;hpb=edbaa4793402ff05a4d3c2823b0cd36862e591c2;p=lilypond.git

diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly
index 3f554f87c9..1a3fcffdc9 100644
--- a/input/lsr/changing--flageolet-mark-size.ly
+++ b/input/lsr/changing--flageolet-mark-size.ly
@@ -1,6 +1,6 @@
 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
 %% This file is in the public domain.
-\version "2.11.64"
+\version "2.12.3"
 
 \header {
   lsrtags = "expressive-marks, unfretted-strings"
@@ -20,12 +20,13 @@ function.
   doctitle = "Changing \\flageolet mark size"
 } % begin verbatim
 
-smallFlageolet = #(let ((m (make-music 'ArticulationEvent
-                          'articulation-type "flageolet")))
-       (set! (ly:music-property m 'tweaks)
-             (acons 'font-size -3
-                    (ly:music-property m 'tweaks)))
-       m)
+smallFlageolet =
+#(let ((m (make-music 'ArticulationEvent
+                      'articulation-type "flageolet")))
+   (ly:music-set-property! m 'tweaks
+     (acons 'font-size -3
+       (ly:music-property m 'tweaks)))
+  m)
 
 \layout { ragged-right = ##f }
 
@@ -33,3 +34,4 @@ smallFlageolet = #(let ((m (make-music 'ArticulationEvent
   d4^\flageolet_\markup { default size } d_\flageolet
   c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet
 }
+