Merge master into nested-bookparts

[lilypond.git] / input / lsr / changing--flageolet-mark-size.ly

diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly
index 834d8b21fd105eb5468678a09eaa4cc5f5cc211b..55a8ce8c393c3d6a353e47e775a4728ad614b17c 100644 (file)
--- a/input/lsr/changing--flageolet-mark-size.ly
+++ b/input/lsr/changing--flageolet-mark-size.ly
@@ -1,21 +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.35"
+\version "2.11.62"
 
 \header {
-  lsrtags = "expressive-marks"
- texidoc = "
-To make the \\flageolet circle smaller you can use the following scheme
-code (found in the Lilypond-user-archive)
-" }
-% begin verbatim
-F = #(let ((m (make-music 'ArticulationEvent
+  lsrtags = "expressive-marks, unfretted-strings"
+
+  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
 }