X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fchanging--flageolet-mark-size.ly;h=a7233f67a3e05b9a873cf2ff0dc3734738b435ab;hb=7e57eb7daf165db3cc1ed70c8173f8692818f83b;hp=f15aaedc36996d320b5b69d7cfdff5692fb18946;hpb=57221c9ee7a758169c9e2fe4805f0ed3598f50d5;p=lilypond.git

diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly
index f15aaedc36..a7233f67a3 100644
--- a/input/lsr/changing--flageolet-mark-size.ly
+++ b/input/lsr/changing--flageolet-mark-size.ly
@@ -1,19 +1,34 @@
-%% Do not edit this file; it is auto-generated from LSR!
-%% Tags: expressive-marks
-\version "2.11.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.57"
 
-\header { texidoc = "
-To make the \\flageolet circle smaller you can use the following scheme
-code (found in the Lilypond-user-archive)
-" }
+\header {
+  lsrtags = "expressive-marks, unfretted-strings"
 
-F = #(let ((m (make-music 'ArticulationEvent
+  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"
+
+  texidoc = "
+To make the @code{\\flageolet} circle smaller use the following Scheme
+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)
 
-\relative c'' { d4^\flageolet_\markup {"orginal \flageolet "} d4_\flageolet
-  c4^\F_\markup {smaller } c4_\F 
+\layout { ragged-right = ##f }
+
+\relative c'' {
+  d4^\flageolet_\markup { default size } d_\flageolet
+  c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet
 }