]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/bar-chords-notation-for-guitar--with-text-spanner.ly
Doc: NR Added glissando grob skip snippet to 1.3.3
[lilypond.git] / Documentation / snippets / bar-chords-notation-for-guitar--with-text-spanner.ly
index a69f4f9ce490f803ed4111438fd8842c314c2997..e31034da50d69170665e88593fb5a35f81aa8deb 100644 (file)
@@ -1,7 +1,10 @@
-%% 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.4"
+\version "2.15.20"
 
 \header {
   lsrtags = "chords, fretted-strings"
@@ -73,9 +76,9 @@ bbarre= #(define-music-function (barre location str music) (string? ly:music?)
                         \once \override TextSpanner #'to-barline = ##f
                         \once \override TextSpanner #'bound-details =  #'((left (Y . 0) (padding . 0.25) (attach-dir . -2)) (right (Y . 0) (padding . 0.25) (attach-dir . 2)))
                         \once  \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'( 0 . -.5) }
-                        \once  \override TextSpanner #'bound-details #'left #'text =  \markup { \pScript $str }
+                        \once  \override TextSpanner #'bound-details #'left #'text =  \markup { \pScript #str }
 %% 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 }
                           #}
     spanned-music))))