X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Ffingering-symbols-for-wind-instruments.ly;h=4274440b67496c381847e2c9740a7930824c4fe5;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=31135a7b419ea476d862ddc265935cd21c41282b;hpb=33fd36cc8b74a2a0e80e43a8dc9dbfcb7d1f7df1;p=lilypond.git

diff --git a/Documentation/snippets/fingering-symbols-for-wind-instruments.ly b/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
index 31135a7b41..4274440b67 100644
--- a/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
+++ b/Documentation/snippets/fingering-symbols-for-wind-instruments.ly
@@ -1,30 +1,13 @@
 %% DO NOT EDIT this file manually; it is automatically
-%% generated from LSR http://lsr.dsi.unimi.it
+%% 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.14.0"
+\version "2.18.0"
 
 \header {
-  lsrtags = "winds"
-
-%% Translation of GIT committish: 615cbf212fdaf0b220b3330da417d0c3602494f2
-  texidoces = "
-Se pueden conseguir símbolos especiales combinando glifos existentes,
-lo que es de utilidad para la notación de instrumentos de viento.
-
-"
-  doctitlees = "Símbolos de digitación para instrumentos de viento"
-
-%% 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 = "symbols-and-glyphs, winds"
 
   texidoc = "
 Special symbols can be achieved by combining existing glyphs, which is
@@ -35,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
   }
 }
-