input/lsr/changing--flageolet-mark-size.ly

   1 %% Do not edit this file; it is auto-generated from LSR!
   2 %% Tags: expressive-marks
   3 \version "2.11.35"
   4
   5 \header { texidoc = "
   6 To make the \\flageolet circle smaller you can use the following scheme
   7 code (found in the Lilypond-user-archive)
   8 " }
   9 % begin verbatim
  10 F = #(let ((m (make-music 'ArticulationEvent
  11                           'articulation-type "flageolet")))
  12        (set! (ly:music-property m 'tweaks)
  13              (acons 'font-size -3
  14                     (ly:music-property m 'tweaks)))
  15        m)
  16
  17 \relative c'' { d4^\flageolet_\markup {"orginal \flageolet "} d4_\flageolet
  18   c4^\F_\markup {smaller } c4_\F
  19 }