Fix #286.

Use staff_space in Stem_tremolo::get_beam_translation()

diff --git a/input/regression/stem-tremolo-staff-space.ly b/input/regression/stem-tremolo-staff-space.ly
new file mode 100644 (file)
index 0000000..22063b6
--- /dev/null
+++ b/input/regression/stem-tremolo-staff-space.ly
@@ -0,0 +1,25 @@
+\header {
+
+  texidoc = "stem tremolo vertical distance also obeys staff-space settings. "
+
+}
+
+\version "2.10.19"
+
+\layout {
+  ragged-right = ##t
+}
+
+fragment = \relative c' {
+  c4:64 c:64 c8:64 c:64 c:64 c:64 c:64
+}
+
+
+<<
+  \new Staff \with {
+    fontSize = #-4
+    \override StaffSymbol #'staff-space = #(magstep -4)
+  }
+  \fragment
+  \new Staff \fragment
+>>

diff --git a/lily/stem-tremolo.cc b/lily/stem-tremolo.cc
index 9bb588db4f73450917cfe182143ffad014aac300..a718b7f69d132918fe6ee370fe87f503a879cc00 100644 (file)
--- a/lily/stem-tremolo.cc
+++ b/lily/stem-tremolo.cc
@@ -84,7 +84,9 @@ Stem_tremolo::get_beam_translation (Grob *me)
   Spanner *beam = Stem::get_beam (stem);
 
   return (beam && beam->is_live ())
-    ? Beam::get_beam_translation (beam) : 0.81;
+    ? Beam::get_beam_translation (beam)
+    : (Staff_symbol_referencer::staff_space (me)
+       * robust_scm2double (me->get_property ("length-fraction"), 1.0) * 0.81);
 }
 
 Stencil