From 3dcd8d730863aa575b0774c3abba3f36301417c3 Mon Sep 17 00:00:00 2001
From: David Nalesnik <address@hidden>
Date: Fri, 21 Aug 2015 18:50:34 -0500
Subject: [PATCH] Don't create extra flags in chords

---
 lily/stem-engraver.cc | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lily/stem-engraver.cc b/lily/stem-engraver.cc
index a84dd70..2f2eaf8 100644
--- a/lily/stem-engraver.cc
+++ b/lily/stem-engraver.cc
@@ -158,7 +158,8 @@ Stem_engraver::acknowledge_rhythmic_head (Grob_info gi)
   Stem::add_head (stem_, gi.grob ());
 
   if (Stem::is_normal_stem (stem_)
-      && Stem::duration_log (stem_) > 2)
+      && Stem::duration_log (stem_) > 2
+      && !(unsmob<Grob> (stem_->get_object ("flag"))))
     {
       Item *flag = make_item ("Flag", stem_->self_scm ());
       flag->set_parent (stem_, X_AXIS);
-- 
1.9.1