X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ffret-diagrams-fret-label.ly;h=9f8a8b0732f12824e8621d997118a54d659596fe;hb=32a34dcef0c0041c6d62677487a380b5c8b85712;hp=e45755c8f24dd31a32caa6025b9ff1f0e0660b9f;hpb=cb47f0d75cc88e34d5cb06fcfbf4104ce0780c90;p=lilypond.git

diff --git a/input/regression/fret-diagrams-fret-label.ly b/input/regression/fret-diagrams-fret-label.ly
index e45755c8f2..9f8a8b0732 100644
--- 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
@@ -45,7 +46,7 @@ size, and number type.
                                      (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 
@@ -61,6 +62,21 @@ size, and number type.
                                      (place-fret 1 3 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))}
+
  }
 >>