X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fbar-chords-notation-for-guitar--with-text-spanner.ly;h=def439e88bc1bb47bc668977964e2224a1c954e3;hb=13da8b2;hp=8a99e867cdb5be0d1df4eee7e33f6d94195554af;hpb=ebc3cdab150ac7de7857043d301f784fd0f8aecc;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 8a99e867cd..def439e88b 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,8 +4,8 @@ % 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.16.0 +\version "2.17.6" \header { lsrtags = "chords, fretted-strings" @@ -42,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) @@ -59,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 #})