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 85a038f55fc2ea96629df0f0546b4415bfa9d516..4d8d548bfd9360397b42d7200cbce848ac9acc29 100644 (file)
--- a/Documentation/snippets/recorder-fingering-chart.ly
+++ b/Documentation/snippets/recorder-fingering-chart.ly
@@ -21,12 +21,9 @@ instruments can be realized.
 
 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.X-offset =#(lambda (g)
+  (+ (ly:self-alignment-interface::centered-on-x-parent g)
+     (ly:self-alignment-interface::x-aligned-on-self g)))
 }
 
 \score {