X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fcenter-text-below-hairpin-dynamics.ly;h=5df30566407927c65092681c098b868795f0394f;hb=76465a6d1c77ff1b30e5c61e9e06178b8d5290d4;hp=8c51f8bf150e04db87624a61400d53faa3fb95f6;hpb=9158bc17904d4dd930a1f776cfe3226f1ad84092;p=lilypond.git diff --git a/Documentation/snippets/center-text-below-hairpin-dynamics.ly b/Documentation/snippets/center-text-below-hairpin-dynamics.ly index 8c51f8bf15..5df3056640 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.31" +\version "2.15.32" \header { - lsrtags = "expressive-marks, text" + lsrtags = "text, really-cool, expressive-marks, scheme-language" -%% Translation of GIT committish: 0b55335aeca1de539bf1125b717e0c21bb6fa31b +%% Translation of GIT committish: 6977ddc9a3b63ea810eaecb864269c7d847ccf98 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)) #})