From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 27 Jan 2004 00:54:46 +0000 (+0000)
Subject: * lily/beam.cc (least_squares): also set least-squares-dy for
X-Git-Tag: release/2.1.23~161
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=eaf02c48d94412dd8684bd314cc84a1c1f9bb133;p=lilypond.git

* lily/beam.cc (least_squares): also set least-squares-dy for
special case of slanted 2-stem beam to center.

* lily/beam.cc: use Drul_array<Real> iso. interval, because *=
operations on empty intervals are silly.
---

diff --git a/ChangeLog b/ChangeLog
index e1cfbc9dbb..52df389069 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2004-01-27  Han-Wen Nienhuys   <hanwen@xs4all.nl>
 
+	* lily/beam.cc (least_squares): also set least-squares-dy for
+	special case of slanted 2-stem beam to center.
+
 	* lily/side-position-interface.cc (out_of_staff): move contents of
 	out_of_staff into aligned_side.
 	remove out_of_staff().
diff --git a/input/regression/beam-center-slope.ly b/input/regression/beam-center-slope.ly
index 24c6ea13ba..c375f25480 100644
--- a/input/regression/beam-center-slope.ly
+++ b/input/regression/beam-center-slope.ly
@@ -36,7 +36,7 @@
 	 f[ a]
     }
     \paper{
-	linewidth = 0.0
+	raggedright = ##t
     }
 }
 
diff --git a/lily/beam.cc b/lily/beam.cc
index 05b83d41d2..0f731ea554 100644
--- a/lily/beam.cc
+++ b/lily/beam.cc
@@ -901,7 +901,8 @@ Beam::least_squares (SCM smob)
 	 slope esp. of the first part of a broken beam should predict
 	 where the second part goes.
        */
-
+      me->set_grob_property ("least-squares-dy",
+			     gh_double2scm (pos[RIGHT] - pos[LEFT]));
     }
   else
     {