source file of the GNU LilyPond music typesetter
- (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
{
if (span_)
{
- span_->set_bound (RIGHT,unsmob_grob (get_property ("currentCommandColumn")));
+ span_->set_bound (RIGHT, unsmob_grob (get_property ("currentCommandColumn")));
}
- span_ =0;
+ span_ = 0;
}
void
Staff_symbol_engraver::acknowledge_grob (Grob_info s)
{
s.grob_->set_property ("staff-symbol", span_->self_scm ());
-
- // remove this. probly not necessary?
- s.grob_->add_dependency (span_); // UGH. UGH. UGH
}
-ENTER_DESCRIPTION (Staff_symbol_engraver,
+ADD_TRANSLATOR (Staff_symbol_engraver,
/* descr */ "Create the constellation of five (default) "
"staff lines.",
/* creats*/ "StaffSymbol",
if (init)
{
int k = scm_ilength (get_property ("stringTunings"));
- if (k>=0)
+ if (k>= 0)
span_->set_property ("line-count", scm_int2num (k));
}
}
{
}
-ENTER_DESCRIPTION (Tab_staff_symbol_engraver,
+ADD_TRANSLATOR (Tab_staff_symbol_engraver,
/* descr */ "Create a staff-symbol, but look at stringTunings for the number of lines."
"staff lines.",
/* creats*/ "StaffSymbol",