LSR: Update.

[lilypond.git] / Documentation / snippets / changing--flageolet-mark-size.ly

diff --git a/Documentation/snippets/changing--flageolet-mark-size.ly b/Documentation/snippets/changing--flageolet-mark-size.ly
index 5afaccdb07339a6a4b8b9f0747ccd887725c40f6..5c7659671584aaa56ed7aae88b1578df8d0e21f1 100644 (file)
--- a/Documentation/snippets/changing--flageolet-mark-size.ly
+++ b/Documentation/snippets/changing--flageolet-mark-size.ly
@@ -40,12 +40,11 @@ function.
 } % begin verbatim
 
 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)
+#(let ((m (make-articulation "flageolet")))
+   (set! (ly:music-property m 'tweaks)
+         (acons 'font-size -3
+                (ly:music-property m 'tweaks)))
+   m)
 
 \layout { ragged-right = ##f }