From b8b2b7c3fd68d2c5b3547b064e1a2042753f73bf Mon Sep 17 00:00:00 2001
From: Trevor Daniels <t.daniels@treda.co.uk>
Date: Tue, 19 Apr 2011 00:25:40 +0100
Subject: [PATCH] Fix 1622 Dynamic spanner not printed under grace notes

---
 lily/spanner.cc | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/lily/spanner.cc b/lily/spanner.cc
index 1f77c8e257..9fe94ab3ac 100644
--- a/lily/spanner.cc
+++ b/lily/spanner.cc
@@ -472,7 +472,6 @@ SCM
 Spanner::kill_zero_spanned_time (SCM grob)
 {
   Spanner *me = unsmob_spanner (grob);
-  Interval_t<Moment> moments = me->spanned_time ();
   /*
     Remove the line or hairpin at the start of the line.  For
     piano voice indicators, it makes no sense to have them at
@@ -488,9 +487,13 @@ Spanner::kill_zero_spanned_time (SCM grob)
     --hwn.
 
   */
-  moments [LEFT].grace_part_ = 0;
-  if (moments.length () == Moment (0, 0))
-    me->suicide ();
+  if (me->get_bound (LEFT)->break_status_dir ())
+    {
+      Interval_t<Moment> moments = me->spanned_time ();
+      moments [LEFT].grace_part_ = 0;
+      if (moments.length () == Moment (0, 0))
+        me->suicide ();
+    }
 
   return SCM_UNSPECIFIED;
 }
-- 
2.39.5