From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Mon, 8 Jan 2007 08:33:48 +0000 (+0100)
Subject: attach GraceSpacing like a normal spanner.
X-Git-Tag: release/2.10.10-1~13
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=9892c22a83df46da1b1f946141bafd35669ed2f0;p=lilypond.git

attach GraceSpacing like a normal spanner.
---

diff --git a/lily/grace-spacing-engraver.cc b/lily/grace-spacing-engraver.cc
index 0e1f8740c5..4249084e48 100644
--- a/lily/grace-spacing-engraver.cc
+++ b/lily/grace-spacing-engraver.cc
@@ -51,6 +51,11 @@ Grace_spacing_engraver::process_music ()
 					 column);
 
       column->set_object ("grace-spacing", grace_spacing_->self_scm ());
+
+      if (!grace_spacing_->get_bound (LEFT))
+	grace_spacing_->set_bound (LEFT, column);
+      else
+	grace_spacing_->set_bound (RIGHT, column);
     }
 }