X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ffret-diagrams-fret-label.ly;h=495562dc281ab9b19779ed50c9fd05d60cd22c75;hb=c40332b19b2224385f4221ede8fc29e57bbc3b01;hp=dbe18f27b6ed7b0a829cdc3a99482962f59e6d9f;hpb=27295a12c9c19b50e039a0dc47124802e68ef501;p=lilypond.git

diff --git a/input/regression/fret-diagrams-fret-label.ly b/input/regression/fret-diagrams-fret-label.ly
index dbe18f27b6..495562dc28 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.19.8"
 
 \header {
   texidoc="
@@ -12,6 +12,7 @@ size, and number type.
 
 <<
   \chords {
+    c1 |
     c1 |
     c1 |
     c1
@@ -28,13 +29,25 @@ 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.label-dir = #LEFT
+    \override TextScript.fret-diagram-details.number-type = #'roman-upper
+    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))}
 
      %% C major for guitar, verbose style
-    \override TextScript #'fret-diagram-details 
-        #'label-dir = #LEFT 
-    \override TextScript #'fret-diagram-details 
-        #'number-type = #'roman-upper 
+    \revert TextScript.fret-diagram-details.label-dir
+    \override TextScript.fret-diagram-details.fret-label-font-mag = #0.4
+    \override TextScript.fret-diagram-details.number-type = #'arabic
+    \once \override TextScript.fret-diagram-details.fret-label-vertical-offset = #0.25
     c' ^\markup {
             \fret-diagram-verbose #'((mute 6)
                                      (place-fret 5 3 1)
@@ -42,16 +55,13 @@ 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
-    \override TextScript #'fret-diagram-details 
-        #'fret-label-font-mag = #0.4 
-    \override TextScript #'fret-diagram-details 
-        #'number-type = #'arabic 
-    \once \override TextScript #'fret-diagram-details 
-        #'fret-label-vertical-offset = #0.25
+    \revert TextScript.fret-diagram-details.label-dir
+    \once \override TextScript.fret-diagram-details.number-type = #'custom
+    \once \override TextScript.fret-diagram-details.fret-label-horizontal-offset = #0.5
+    \once \override TextScript.fret-diagram-details.fret-label-custom-format = #"~d°"
     c' ^\markup {
             \fret-diagram-verbose #'((mute 6)
                                      (place-fret 5 3 1)
@@ -59,9 +69,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))}
 
  }
 >>
-
-