]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/center-text-below-hairpin-dynamics.ly
MakeLSR updates
[lilypond.git] / Documentation / snippets / center-text-below-hairpin-dynamics.ly
index 0df124d21e273eff58f6c9999aab805f62e4d0f0..b69e4e0dffe29700ddb6bcaa31bda3d7ae2dcb7c 100644 (file)
@@ -30,11 +30,11 @@ hairpinWithCenteredText =
              (par-y (ly:grob-parent grob Y))
              (dir (ly:grob-property par-y 'direction))
              (new-stencil (ly:stencil-aligned-to
-                  (ly:stencil-combine-at-edge
-                    (ly:stencil-aligned-to stencil X CENTER)
-                    Y dir
-                    (ly:stencil-aligned-to (grob-interpret-markup grob text) X CENTER))
-                    X LEFT))
+                          (ly:stencil-combine-at-edge
+                            (ly:stencil-aligned-to stencil X CENTER)
+                            Y dir
+                            (ly:stencil-aligned-to (grob-interpret-markup grob text) X CENTER))
+                            X LEFT))
              (staff-space (ly:output-def-lookup (ly:grob-layout grob) 'staff-space))
              (staff-line-thickness (ly:output-def-lookup (ly:grob-layout grob) 'line-thickness))
              (grob-name (lambda (x) (assq-ref (ly:grob-property x 'meta) 'name)))