Run scripts/auxiliar/update-with-convert-ly.sh

[lilypond.git] / input / regression / fret-diagrams-fret-label.ly

diff --git a/input/regression/fret-diagrams-fret-label.ly b/input/regression/fret-diagrams-fret-label.ly
index dbe18f27b6ed7b0a829cdc3a99482962f59e6d9f..9f8a8b0732f12824e8621d997118a54d659596fe 100644 (file)
--- a/input/regression/fret-diagrams-fret-label.ly
+++ b/input/regression/fret-diagrams-fret-label.ly
@@ -1,4 +1,4 @@
-\version "2.12.0"
+\version "2.16.0"
 
 \header {
   texidoc="
@@ -12,6 +12,7 @@ size, and number type.
 
 <<
   \chords {
+    c1 |
     c1 |
     c1 |
     c1
@@ -28,7 +29,7 @@ size, and number type.
                                      (place-fret 3 5 3)
                                      (place-fret 2 5 4)
                                      (place-fret 1 3 1)
-                                     (barre 5 1 1))}
+                                     (barre 5 1 3))}
 
      %% C major for guitar, verbose style
     \override TextScript #'fret-diagram-details 
@@ -42,10 +43,10 @@ size, and number type.
                                      (place-fret 3 5 3)
                                      (place-fret 2 5 4)
                                      (place-fret 1 3 1)
-                                     (barre 5 1 1))}
+                                     (barre 5 1 3))}
 
      %% C major for guitar, verbose style
-    \revert TextScript #'fret-diagram-details #'label-dir
+    \revert TextScript #'(fret-diagram-details label-dir)
     \override TextScript #'fret-diagram-details 
         #'fret-label-font-mag = #0.4 
     \override TextScript #'fret-diagram-details 
@@ -59,7 +60,22 @@ size, and number type.
                                      (place-fret 3 5 3)
                                      (place-fret 2 5 4)
                                      (place-fret 1 3 1)
-                                     (barre 5 1 1))}
+                                     (barre 5 1 3))}
+
+     %% C major for guitar, verbose style
+    \revert TextScript #'(fret-diagram-details label-dir)
+    \once \override TextScript #'fret-diagram-details 
+        #'number-type = #'custom
+    \once \override TextScript #'fret-diagram-details 
+        #'fret-label-custom-format = #"~d°"
+    c' ^\markup {
+            \fret-diagram-verbose #'((mute 6)
+                                     (place-fret 5 3 1)
+                                     (place-fret 4 5 2)
+                                     (place-fret 3 5 3)
+                                     (place-fret 2 5 4)
+                                     (place-fret 1 3 1)
+                                     (barre 5 1 3))}
 
  }
 >>