source file of the GNU LilyPond music typesetter
- (c) 2006 Han-Wen <hanwen@lilypond.org>
+ (c) 2006--2007 Han-Wen <hanwen@lilypond.org>
*/
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);
}
}
/* create */
"GraceSpacing ",
-
- /* accept */
- "",
/* read */
"currentMusicalColumn ",