X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fchanging--flageolet-mark-size.ly;h=1ed164a0d0390ed8a40aa0fe0c50174888f3fb01;hb=1423508c355989fa26a8cfe5985b0d6e1ab0a538;hp=9bb8a0afd77415508f4764d57300585c088cfa81;hpb=f844ae0d425f0e1c16ae0019228b136dd85c17a7;p=lilypond.git diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly index 9bb8a0afd7..1ed164a0d0 100644 --- a/input/lsr/changing--flageolet-mark-size.ly +++ b/input/lsr/changing--flageolet-mark-size.ly @@ -1,10 +1,35 @@ %% 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.49" +\version "2.13.1" \header { lsrtags = "expressive-marks, unfretted-strings" +%% Translation of GIT committish: dff50e8e1d3134657a6b6203b9c93826dc4cef65 + texidoces = " +Para hacer más pequeño el círculo de @code{\\flageolet} (armónico) +utilice la siguiente función de Scheme. + +" + doctitlees = "Cambiar el tamaño de la marca de \\flageolet" + +%% Translation of GIT committish: 0099693675b95c7ec6664d7277f22411a14e9c1b + + texidocfr = " +Il est possible de rapetisser le cercle d'un @code{\\flageolet} grâce +à une fonction Scheme. + +" + doctitlefr = "Modifier la taille d'un \\flageolet" + +%% Translation of GIT committish: 33f623301a41fcc53efadf96bca1c72834763415 + texidocde = " +Um den @code{\\flageolet}-Kreis kleiner zu machen, kann diese +Scheme-Funktion eingesetzt werden. + +" + doctitlede = "\\flageolet-Zeichen verkleinern" + texidoc = " To make the @code{\\flageolet} circle smaller use the following Scheme function. @@ -12,12 +37,14 @@ 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 } @@ -25,3 +52,4 @@ smallFlageolet = #(let ((m (make-music 'ArticulationEvent d4^\flageolet_\markup { default size } d_\flageolet c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet } +