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=8a50484b054224cfc72b65e63e88287ea812ba53;hp=2c2189fb1a5a333177fd837c3c5d759d529520fc;hpb=5c42908f1c8d0a5c1d88851a2d793ca55476612c;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 2c2189fb1a..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,8 +4,8 @@ % and then run scripts/auxiliar/makelsr.py % % This file is in the public domain. -%% Note: this file works from version 2.16.0 -\version "2.16.0" +%% Note: this file works from version 2.17.6 +\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 #})