X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fchanging--flageolet-mark-size.ly;h=1ed164a0d0390ed8a40aa0fe0c50174888f3fb01;hb=1423508c355989fa26a8cfe5985b0d6e1ab0a538;hp=c87ef59560b1e22d650774c90ed9d341f224c4fe;hpb=c39c24228ac07650d316df5a28a00a05d2d5da51;p=lilypond.git diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly index c87ef59560..1ed164a0d0 100644 --- a/input/lsr/changing--flageolet-mark-size.ly +++ b/input/lsr/changing--flageolet-mark-size.ly @@ -1,16 +1,34 @@ %% 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.52" +\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) +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" + 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 @@ -19,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 } @@ -32,3 +52,4 @@ smallFlageolet = #(let ((m (make-music 'ArticulationEvent d4^\flageolet_\markup { default size } d_\flageolet c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet } +