Change stringTunings from list of semitones to list of pitches

[lilypond.git] / Documentation / snippets / simultaneous-headword.ly

diff --git a/Documentation/snippets/simultaneous-headword.ly b/Documentation/snippets/simultaneous-headword.ly
index f64e03f713e4159f6249505a632007fe0c50b445..224565b6dac0aa60e883af3ff1392eb98378cd22 100644 (file)
--- a/Documentation/snippets/simultaneous-headword.ly
+++ b/Documentation/snippets/simultaneous-headword.ly
@@ -1,8 +1,8 @@
 % Do not edit this file; it is automatically
 % generated from Documentation/snippets/new
 % This file is in the public domain.
-%% Note: this file works from version 2.12.0
-\version "2.13.10"
+%% Note: this file works from version 2.13.36
+\version "2.13.46"
 \include "english.ly"
 #(set-global-staff-size 15)
 \paper {
@@ -44,12 +44,16 @@
   }
 }
 
-trillflat =
-\once \override TrillSpanner #'(bound-details left text) =
-#(markup #:translate-scaled '(-0.05 . -1)
-  #:concat (#:musicglyph "scripts.trill"
-    #:translate '(-0.5 . 1.9) #:fontsize -7 #:flat))
-
+trillFlat =
+\once \override TrillSpanner #'(bound-details left text) = \markup {
+  \concat {
+    \musicglyph #"scripts.trill"
+    \translate #'(-0.5 . 1.9)
+    \fontsize #-7
+    \with-dimensions #'(0 . 0) #'(0 . 0)
+    \flat
+  }
+}
 
 \new PianoStaff <<
 
@@ -100,7 +104,7 @@ trillflat =
       |
       \break
 
-      \trillflat
+      \trillFlat
       af''4. \startTrillSpan
       ~
       af''8.
@@ -156,7 +160,7 @@ trillflat =
       |
 
       d''8. \stopTrillSpan
-      \trillflat
+      \trillFlat
       d''4. \startTrillSpan
       ~
 
@@ -183,7 +187,7 @@ trillflat =
 
       |
 
-      \trillflat
+      \trillFlat
       d''4. \startTrillSpan
       ~
       d''8.