Index: lily/stem-tremolo.cc
===================================================================
RCS file: /sources/lilypond/lilypond/lily/stem-tremolo.cc,v
retrieving revision 1.102
diff -u -r1.102 stem-tremolo.cc
--- lily/stem-tremolo.cc	18 Apr 2006 09:15:45 -0000	1.102
+++ lily/stem-tremolo.cc	25 Apr 2006 08:25:03 -0000
@@ -202,8 +202,8 @@
       /* 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);
 
Index: input/regression/stem-tremolo.ly
===================================================================
RCS file: /sources/lilypond/lilypond/input/regression/stem-tremolo.ly,v
retrieving revision 1.36
diff -u -r1.36 stem-tremolo.ly
--- input/regression/stem-tremolo.ly	30 Mar 2006 10:33:12 -0000	1.36
+++ input/regression/stem-tremolo.ly	25 Apr 2006 08:25:03 -0000
@@ -21,7 +21,8 @@
   \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