CG: explain what big staff size means in regtests

[lilypond.git] / Documentation / snippets / center-text-below-hairpin-dynamics.ly

diff --git a/Documentation/snippets/center-text-below-hairpin-dynamics.ly b/Documentation/snippets/center-text-below-hairpin-dynamics.ly
index 04739dc1fa7b4394aeb0bbd8119b73de491d6615..d588c05b53df6a6eba508a58f12ece0804c1a27f 100644 (file)
--- a/Documentation/snippets/center-text-below-hairpin-dynamics.ly
+++ b/Documentation/snippets/center-text-below-hairpin-dynamics.ly
@@ -4,12 +4,12 @@
 %% and then run scripts/auxiliar/makelsr.py
 %%
 %% This file is in the public domain.
-\version "2.14.0"
+\version "2.15.40"
 
 \header {
-  lsrtags = "expressive-marks, text"
+  lsrtags = "expressive-marks, text, scheme-language, really-cool"
 
-%% Translation of GIT committish: 70f5f30161f7b804a681cd080274bfcdc9f4fe8c
+%% Translation of GIT committish: b482c3e5b56c3841a88d957e0ca12964bd3e64fa
   texidoces = "
 Este ejemplo proporciona una función para tipografiar un regulador con
 texto por debajo, como @qq{molto} o @qq{poco}. El ejemplo ilustra
@@ -19,6 +19,16 @@ objeto, utilizando código de Scheme.
 "
   doctitlees = "Centrar texto debajo de un regulador"
 
+%% Translation of GIT committish: f5cfaf8ef4ac347702f554af0944ef0d8396e73a
+  texidocfr = "
+La fonction comprise dans l'extrait suivant permet d'ajouter du texte
+-- comme @qq{molto} o @qq{poco} -- en dessous d'un soufflet de
+(de)crescendo.  Cet exemple présente aussi comment, à l'aide de code
+Scheme, influencer la manière dont un objet est normalement imprimé.
+
+"
+  doctitlefr = "Texte centré sous un soufflet"
+
   texidoc = "
 This example provides a function to typeset a hairpin (de)crescendo
 with some additional text below it, such as @qq{molto} or @qq{poco}.
@@ -29,6 +39,7 @@ normally printed, using some Scheme code.
   doctitle = "Center text below hairpin dynamics"
 } % begin verbatim
 
+
 hairpinWithCenteredText =
 #(define-music-function (parser location text) (markup?)
 #{
@@ -37,7 +48,7 @@ hairpinWithCenteredText =
      (ly:stencil-combine-at-edge
       (ly:stencil-aligned-to (ly:hairpin::print grob) X CENTER)
       Y DOWN
-      (ly:stencil-aligned-to (grob-interpret-markup grob $text) X CENTER))
+      (ly:stencil-aligned-to (grob-interpret-markup grob text) X CENTER))
      X LEFT))
 #})