From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 18 Apr 2005 15:28:33 +0000 (+0000)
Subject: (calc_stem_info): add minimum Y extent of
X-Git-Tag: release/2.5.20~2
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8407472f3b4bbd8823ea79e16f65a2350de17936;p=lilypond.git

(calc_stem_info): add minimum Y extent of
stem-tremolo.  Fixes: bugs/tremolo-stem-length-beamed
---

diff --git a/ChangeLog b/ChangeLog
index b6b2c27031..70e2175c0d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2005-04-18  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
+	* lily/stem.cc (calc_stem_info): add minimum Y extent of
+	stem-tremolo.  Fixes: bugs/tremolo-stem-length-beamed
+
 	* lily/percent-repeat-engraver.cc (try_music): add measure before
 	next_moment to future processing moment. Fixes:
 	percent-repeat-mm-rest.ly
diff --git a/lily/stem.cc b/lily/stem.cc
index 9378869c7b..ef65d34002 100644
--- a/lily/stem.cc
+++ b/lily/stem.cc
@@ -878,6 +878,13 @@ Stem::calc_stem_info (Grob *me)
     /* stem only extends to center of beam */
     - 0.5 * beam_thickness;
 
+  if (Grob *tremolo = unsmob_grob (me->get_property ("tremolo-flag")))
+    {
+      Interval y_ext = tremolo->extent (tremolo, Y_AXIS);
+      y_ext.widen (0.5);	// FIXME. Should be tunable? 
+      minimum_length = minimum_length >? y_ext.length ();
+    }
+  
   ideal_y *= my_dir;
   Real minimum_y = note_start + minimum_length;
   Real shortest_y = minimum_y * my_dir;