]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/changing--flageolet-mark-size.ly
Imported Upstream version 2.12.3
[lilypond.git] / input / lsr / changing--flageolet-mark-size.ly
index 3f8ad3251f90b1935e5064ae048971d126868ce0..1a3fcffdc9c35289c33fe6c9ecfae6eb10ef3161 100644 (file)
@@ -1,22 +1,37 @@
 %% 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.38"
+\version "2.12.3"
 
 \header {
-  lsrtags = "expressive-marks"
- texidoc = "
-To make the @code{\\flageolet} circle smaller you can use the following
-Scheme code. 
-" }
-% 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)
+  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")))
+   (ly:music-set-property! m 'tweaks
+     (acons 'font-size -3
+       (ly:music-property m 'tweaks)))
+  m)
+
+\layout { ragged-right = ##f }
 
 \relative c'' {
-  d4^\flageolet_\markup { default size } d4_\flageolet
-  c4^\smallFlageolet_\markup { smaller } c4_\smallFlageolet
+  d4^\flageolet_\markup { default size } d_\flageolet
+  c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet
 }
+