From: Valentin Villenave <valentin@villenave.net>
Date: Sun, 13 Jan 2008 17:59:20 +0000 (+0100)
Subject: second patch from Joe: fix a silly mistake with infinite stiff springs
X-Git-Tag: release/2.11.38-1~92
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=04faa1ba634c75c05716b7f49928ebe187862f20;p=lilypond.git

second patch from Joe: fix a silly mistake with infinite stiff springs
---

diff --git a/lily/simple-spacer.cc b/lily/simple-spacer.cc
index f16e607061..9129361cbd 100644
--- a/lily/simple-spacer.cc
+++ b/lily/simple-spacer.cc
@@ -84,7 +84,7 @@ Simple_spacer::rod_force (int l, int r, Real dist)
   Real c = range_stiffness (l, r, dist > d);
   Real block_stretch = dist - d;
 
-  if (isinf (c)) /* take care of the 0*infinity_f case */
+  if (isinf (c) && block_stretch == 0) /* take care of the 0*infinity_f case */
     return 0;
   return c * block_stretch;
 }