X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fbar-chords-notation-for-guitar--with-text-spanner.ly;h=a1e72321872dae356e64af20db20febb79a7c491;hb=bcb2a9dc0a511de8587c58b29ac9134f40483228;hp=7f93bf3894c8f2a747821502bf2ff203b9ecc50f;hpb=6ae36b6f8a7cf2df5f4e46c3c06820fccd9f35e1;p=lilypond.git

diff --git a/Documentation/snippets/bar-chords-notation-for-guitar--with-text-spanner.ly b/Documentation/snippets/bar-chords-notation-for-guitar--with-text-spanner.ly
index 7f93bf3894..a1e7232187 100644
--- a/Documentation/snippets/bar-chords-notation-for-guitar--with-text-spanner.ly
+++ b/Documentation/snippets/bar-chords-notation-for-guitar--with-text-spanner.ly
@@ -4,21 +4,10 @@
 % and then run scripts/auxiliar/makelsr.py
 %
 % This file is in the public domain.
-%% Note: this file works from version 2.15.30
-\version "2.15.30"
+%% Note: this file works from version 2.17.6
+\version "2.17.6"
 
 \header {
-%% Translation of GIT committish: b482c3e5b56c3841a88d957e0ca12964bd3e64fa
-  texidoces = "
-He aquí cómo imprimir acordes con cejilla o con media cejilla (quite
-la marca de comentario de la línea adecuada para seleccionar uno de
-ellos).
-
-La sintaxis es @code{\\bbarre #\"@var{número de traste}\" @{ notas @} }.
-
-"
-  doctitlees = "Notación de acordes de cejilla para guitarra (con elemento de extensión de texto)"
-
   lsrtags = "chords, fretted-strings"
 
   texidoc = "
@@ -53,12 +42,12 @@ bbarre =
                  (cons (make-music 'TextSpanEvent 'span-direction 1)
                        (ly:music-property last-element 'articulations))))))
    #{
-       \once \override TextSpanner #'font-size = #-2
-       \once \override TextSpanner #'font-shape = #'upright
-       \once \override TextSpanner #'staff-padding = #3
-       \once \override TextSpanner #'style = #'line
-       \once \override TextSpanner #'to-barline = ##f
-       \once \override TextSpanner #'bound-details =
+       \once \override TextSpanner.font-size = #-2
+       \once \override TextSpanner.font-shape = #'upright
+       \once \override TextSpanner.staff-padding = #3
+       \once \override TextSpanner.style = #'line
+       \once \override TextSpanner.to-barline = ##f
+       \once \override TextSpanner.bound-details =
             #`((left
                 (text . ,#{ \markup { \draw-line #'( 0 . -.5) } #})
                 (Y . 0)
@@ -70,7 +59,7 @@ bbarre =
                 (padding . 0.25)
                 (attach-dir . 2)))
 %% uncomment this line for make full barred
-       % \once  \override TextSpanner #'bound-details #'left #'text =  \markup { "B" #str }
+       % \once  \override TextSpanner.bound-details.left.text =  \markup { "B" #str }
        $music
    #})