From d3c1f8d139c6ebbb3e08c2e15e47a93f0c5081d8 Mon Sep 17 00:00:00 2001
From: Risto Vaaraniemi <risvaara@gmail.com>
Date: Fri, 25 Apr 2008 09:47:02 +0300
Subject: [PATCH] Fix flag positioning for \note markup.
---
scm/define-markup-commands.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index 57a66c7c5d..71fe0f5a66 100644
--- a/scm/define-markup-commands.scm
+++ b/scm/define-markup-commands.scm
@@ -1414,7 +1414,7 @@ Construct a note symbol, with stem. By using fractional values for
(string-append "flags."
(if (> dir 0) "u" "d")
(number->string log)))
- (cons (car attach-off) stemy)))))
+ (cons (+ (car attach-off) (if (< dir 0) stem-thickness 0)) stemy)))))
(if (and dots flaggl (> dir 0))
(set! dots (ly:stencil-translate-axis dots 0.35 X)))
--
2.39.5