Issue 5167/6: Changes: show \markup xxx = ... \etc assignments

[lilypond.git] / Documentation / snippets / recorder-fingering-chart.ly

diff --git a/Documentation/snippets/recorder-fingering-chart.ly b/Documentation/snippets/recorder-fingering-chart.ly
index 87bdb2a49ff37a5ae750664a4c1d5e15a243bb49..4d8d548bfd9360397b42d7200cbce848ac9acc29 100644 (file)
--- a/Documentation/snippets/recorder-fingering-chart.ly
+++ b/Documentation/snippets/recorder-fingering-chart.ly
@@ -1,33 +1,14 @@
 %% 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.15.32"
+\version "2.18.0"
 
 \header {
   lsrtags = "winds"
 
-%% Translation of GIT committish: 6977ddc9a3b63ea810eaecb864269c7d847ccf98
-
-  texidoces = "
-El ejemplo siguiente muestra cómo se pueden realizar diagramas de
-digitación para instrumentos de viento.
-
-"
-
-  doctitlees = "Diagramas de digitación para la flauta dulce"
-
-%% Translation of GIT committish: 496c48f1f2e4d345ae3637b2c38ec748a55cda1d
-  texidocfr = "
-Cet exemple illustre la manière de créer et afficher des indications de
-doigté pour instrument à vent.
-
-"
-  doctitlefr = "Doigtés pour flûte à bec"
-
-
   texidoc = "
 The following example demonstrates how fingering charts for wind
 instruments can be realized.
@@ -39,20 +20,17 @@ instruments can be realized.
 % range chart for paetzold contrabass recorder
 
 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 {
   \new Staff \with {
     \remove "Time_signature_engraver"
-    \override Stem #'stencil = ##f
-    \override Flag #'stencil = ##f
+    \omit Stem
+    \omit Flag
     \consists "Horizontal_bracket_engraver"
   }
   {
@@ -63,24 +41,22 @@ centermarkup = {
     gis'1*1/4
     \stemDown a'4^\markup{1)}
     \centermarkup
-    \once \override TextScript #'padding = #2
+    \once \override TextScript.padding = #2
     bes'1*1/4_\markup{\override #'(baseline-skip . 1.7) \column
       { \fontsize #-5 \slashed-digit #0 \finger 1 \finger 2 \finger 3 \finger 4
     \finger 5 \finger 6 \finger 7} }
     b'1*1/4
     c''4^\markup{1)}
     \centermarkup
-    \once \override TextScript #'padding = #2
+    \once \override TextScript.padding = #2
     cis''1*1/4
     deh''1*1/4
     \centermarkup
-    \once \override TextScript #'padding = #2
-    \once \override Staff.HorizontalBracket #'direction = #UP
+    \once \override TextScript.padding = #2
+    \once \override Staff.HorizontalBracket.direction = #UP
     e''1*1/4_\markup{\override #'(baseline-skip . 1.7) \column
       { \fontsize #-5 \slashed-digit #0 \finger 1 \finger 2 \finger 4
     \finger 5} }\startGroup
     f''1*1/4^\markup{2)}\stopGroup
   }
 }
-
-