From c43b1d529df040f451cd92615ae2e7305d2da923 Mon Sep 17 00:00:00 2001
From: Valentin Villenave <valentin@villenave.net>
Date: Sat, 8 Aug 2009 15:01:56 +0200
Subject: [PATCH] fermataMarkup correction

Thanks to 'gnomino' on the bug list, here's a slightly
improved definition of fermataMarkup that takes the
markup's direction into account to either print
the dfermata or ufermata glyph accordingly.
---
 ly/property-init.ly | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 8759c7dad7..ae8d338248 100644
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -320,7 +320,13 @@ arpeggioParenthesisDashed = {
 
 glissando = #(make-music 'GlissandoEvent)
 
-fermataMarkup = \markup { \musicglyph #"scripts.ufermata" }
+fermataMarkup =
+#(make-music 'MultiMeasureTextEvent
+   ; Set the 'text based on the 'direction
+   'tweaks (list (cons 'text (lambda (grob)
+       (if (eq? (ly:grob-property grob 'direction) DOWN)
+           (markup #:musicglyph "scripts.dfermata")
+           (markup #:musicglyph "scripts.ufermata"))))))
 
 hideNotes = {
   % hide notes, accidentals, etc.
-- 
2.39.2