Imported Upstream version 2.16.0

[lilypond.git] / input / regression / tablature-letter.ly

diff --git a/input/regression/tablature-letter.ly b/input/regression/tablature-letter.ly
index 3fc098e8d830f1e7c8989222f05427f48d96e109..2431769f91c409462f95f570f415b1ec3a4e922d 100644 (file)
--- a/input/regression/tablature-letter.ly
+++ b/input/regression/tablature-letter.ly
@@ -1,4 +1,4 @@
-\version "2.14.0"
+\version "2.16.0"
 
 \header {
   texidoc = "
@@ -16,25 +16,20 @@ if the length is too short.
 notes = \relative c' {
   \time 3/4
   <f d>4. <bes>8 <g e>4
-  \set fretLabels = #`("a" "b" ,(markup #:italic #:smaller "c"))
+  \set fretLabels = \markuplist {"a" "b" \italic \smaller "c"}
   <f d>4. <bes>8 <g e>4
-  \set fretLabels = #`(,(markup #:with-color red "a")
+  \set fretLabels = \markuplist {\with-color #red "a"
                        "b"
-                       ,(markup #:italic #:smaller "c"))
+                       \italic \smaller "c"}
   <f d>4. <bes>8 <g e>4
-  \set fretLabels = #'("α" "β" "γ")
+  \set fretLabels = \markuplist {"α" "β" "γ"}
   <f d>4. <bes>8 <g e>4
 }
 
 \score {
   \new TabStaff
   \with {
-    stringTunings = #`(,(ly:make-pitch 1 3 0)
-                       ,(ly:make-pitch 1 1 0)
-                      ,(ly:make-pitch 0 5 0)
-                      ,(ly:make-pitch 0 3 0)
-                      ,(ly:make-pitch 0 1 0)
-                      ,(ly:make-pitch -1 5 0))
+    stringTunings = \stringTuning \notemode { <a d' f' a' d'' f''> }
     tablatureFormat = #fret-letter-tablature-format
   }
   \new TabVoice {