]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grace-spacing-engraver.cc
attach GraceSpacing like a normal spanner.
[lilypond.git] / lily / grace-spacing-engraver.cc
index 0e1f8740c54ac847f094dadc58ba9f7dcb290c3c..4249084e48448db1b1b75652e97990b702ab1b47 100644 (file)
@@ -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);
     }
 }