From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Wed, 26 Apr 2006 16:00:40 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: release/2.9.3~31
X-Git-Url: https://git.donarmstrong.com/lilypond.git?a=commitdiff_plain;h=fded70fbd4c4c22081a495f6dec53cc7a2263061;p=lilypond.git

*** empty log message ***
---

diff --git a/ChangeLog b/ChangeLog
index 983302db67..82bcc20690 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2006-04-25  Joe Neeman <joeneeman@gmail.com>
+
+	* lily/stem-tremolo.cc (print): fix whole note tremolo placement
+
+	* input/regression/stem-tremolo.ly: add 2 more whole note examples
+	
 2006-04-24  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
 	* lily/relocate.cc (read_relocation_dir): new function.
diff --git a/input/regression/stem-tremolo.ly b/input/regression/stem-tremolo.ly
index 6cc2729daf..ab8283adff 100644
--- a/input/regression/stem-tremolo.ly
+++ b/input/regression/stem-tremolo.ly
@@ -21,7 +21,8 @@ a fixed distance from the note head.
   \textSpannerUp
   \override TextScript  #'padding = #5
   a1:4^":4" a:8^":8" c:16^":16" a:32^":32" a^"x" a:^":"
-  a4:4 c:8 a:16 c:32 a a: a2:
+  a':32 a,,:32
+  a'4:4 c:8 a:16 c:32 a a: a2:
   \break
   \stemUp
   a4:32 a'4:64 
diff --git a/lily/stem-tremolo.cc b/lily/stem-tremolo.cc
index cec65cbcaf..f15d2c4154 100644
--- a/lily/stem-tremolo.cc
+++ b/lily/stem-tremolo.cc
@@ -202,8 +202,8 @@ Stem_tremolo::print (SCM grob)
       /* we shouldn't position relative to the end of the stem since the stem
          is invisible */
       vector<int> nhp = Stem::note_head_positions (stem);
-      Real note_head = (stemdir == UP ? nhp.back () : nhp[0]);
-      end_y = note_head + stemdir * 2.0;
+      Real note_head = (stemdir == UP ? nhp.back () : nhp[0]) * ss / 2;
+      end_y = note_head + stemdir * 1.5;
     }
   mol.translate_axis (end_y, Y_AXIS);