From c8466eece2e1ffbce543ad3be3a8a8dd392dc70d Mon Sep 17 00:00:00 2001
From: Risto <risvaara@gmail.com>
Date: Wed, 23 Apr 2008 16:54:15 +0300
Subject: [PATCH] note-by-number horizontal flag position v2

---
 scm/define-markup-commands.scm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index 57a66c7..6b0f152 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 (if (> dir 0) (car attach-off) (+ (car attach-off) stem-thickness)) stemy)))))
 
     (if (and dots flaggl (> dir 0))
 	(set! dots (ly:stencil-translate-axis dots 0.35 X)))
-- 
1.5.5.1

