*** empty log message ***

diff --git a/ChangeLog b/ChangeLog
index 983302db67c24cfd7dededaa43eb15d782423c1c..82bcc20690b6d1e379798e2157cbfbaae7b4fdb4 100644 (file)
--- 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 6cc2729daf5bb064f4a68458962dc82aedd2bafd..ab8283adffc2868cb160ce9c2c26b4c5fb7dda01 100644 (file)
--- 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 cec65cbcafc030db87367f41025fc67d8e59403f..f15d2c4154c8a3a7b5dae379bbd5ff3368ba1415 100644 (file)
--- 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);