Doc-de: rebirth of usage.tely

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

diff --git a/Documentation/snippets/simultaneous-headword.ly b/Documentation/snippets/simultaneous-headword.ly
index f64e03f713e4159f6249505a632007fe0c50b445..cf5460e6dc01e1cacc50ec37815d9d6b0ba1eabd 100644 (file)
--- a/Documentation/snippets/simultaneous-headword.ly
+++ b/Documentation/snippets/simultaneous-headword.ly
@@ -2,7 +2,7 @@
 % 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"
+\version "2.13.29"
 \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.