X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fcenter-text-below-hairpin-dynamics.ly;h=75c30ded2e994e19e8829abfc3c54d861ae6018b;hb=6ae36b6f8a7cf2df5f4e46c3c06820fccd9f35e1;hp=790bfc667cebe3880144f5bad08c7b13836f809b;hpb=8860a7700be8348848bba7972ad86ef46721c544;p=lilypond.git diff --git a/Documentation/snippets/center-text-below-hairpin-dynamics.ly b/Documentation/snippets/center-text-below-hairpin-dynamics.ly index 790bfc667c..75c30ded2e 100644 --- a/Documentation/snippets/center-text-below-hairpin-dynamics.ly +++ b/Documentation/snippets/center-text-below-hairpin-dynamics.ly @@ -1,12 +1,15 @@ -%% Do not edit this file; it is automatically +%% DO NOT EDIT this file manually; it is automatically %% generated from LSR http://lsr.dsi.unimi.it +%% Make any changes in LSR itself, or in Documentation/snippets/new/ , +%% and then run scripts/auxiliar/makelsr.py +%% %% This file is in the public domain. -\version "2.13.20" +\version "2.15.32" \header { - lsrtags = "expressive-marks, text" + lsrtags = "text, really-cool, expressive-marks, scheme-language" -%% Translation of GIT committish: e0aa246e0ed1a86dc41a99ab79bff822d3320aa7 +%% 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 @@ -26,6 +29,7 @@ normally printed, using some Scheme code. doctitle = "Center text below hairpin dynamics" } % begin verbatim + hairpinWithCenteredText = #(define-music-function (parser location text) (markup?) #{ @@ -34,7 +38,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)) #})