X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Ffingering-symbols-for-wind-instruments.ly;h=4274440b67496c381847e2c9740a7930824c4fe5;hb=4b994f8a49892039def08d141daf12c128a12cd4;hp=e2778cc9dec3364a9280aaec98858b5a9668e606;hpb=01097a2a0d059f418cf7803d6c83c41ecc639110;p=lilypond.git

diff --git a/Documentation/snippets/fingering-symbols-for-wind-instruments.ly b/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
index e2778cc9de..4274440b67 100644
--- a/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
+++ b/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
@@ -1,19 +1,13 @@
-%% Do not edit this file; it is automatically
-%% generated from LSR http://lsr.dsi.unimi.it
+%% DO NOT EDIT this file manually; it is automatically
+%% generated from LSR http://lsr.di.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
 %% This file is in the public domain.
-\version "2.13.31"
+\version "2.18.0"
 
 \header {
-%% Translation of GIT committish: 496c48f1f2e4d345ae3637b2c38ec748a55cda1d
-  texidocfr = "
-Des sumboles spécifiques peuvent être obtenus en combinant les glyphes
-disponibles, ce qui est tout à fait indiqué en matière d'instrument à vent.
-
-"
-  doctitlefr = "Symboles de doigtés pour instruments à vent"
-
-
-  lsrtags = "winds"
+  lsrtags = "symbols-and-glyphs, winds"
 
   texidoc = "
 Special symbols can be achieved by combining existing glyphs, which is
@@ -24,24 +18,28 @@ useful for wind instruments.
 } % begin verbatim
 
 centermarkup = {
-  \once \override TextScript #'self-alignment-X = #CENTER
-  \once \override TextScript #'X-offset =#(ly:make-simple-closure
-    `(,+
-      ,(ly:make-simple-closure (list
-        ly:self-alignment-interface::centered-on-x-parent))
-      ,(ly:make-simple-closure (list
-        ly:self-alignment-interface::x-aligned-on-self))))
+  \once \override TextScript.self-alignment-X = #CENTER
+  \once \override TextScript.X-offset =#(lambda (g)
+  (+ (ly:self-alignment-interface::centered-on-x-parent g)
+     (ly:self-alignment-interface::x-aligned-on-self g)))
 }
-\score
-{\relative c'
-  {
+
+\score {
+  \relative c'{
     g\open
-    \once \override TextScript #'staff-padding = #-1.0 \centermarkup
-    g^\markup{\combine \musicglyph #"scripts.open" \musicglyph
-    #"scripts.tenuto"}
-    \centermarkup g^\markup{\combine \musicglyph #"scripts.open"
-    \musicglyph #"scripts.stopped"}
+    \once \override TextScript.staff-padding = #-1.0
+    \centermarkup
+    g^\markup {
+      \combine
+        \musicglyph #"scripts.open"
+        \musicglyph #"scripts.tenuto"
+    }
+    \centermarkup
+    g^\markup {
+      \combine
+        \musicglyph #"scripts.open"
+        \musicglyph #"scripts.stopped"
+    }
     g\stopped
   }
 }
-