use spanner::set-spacing-ronds
* scm/define-grobs.scm (all-grob-descriptions): add
springs-and-rods
2006-09-16 Han-Wen Nienhuys <hanwen@lilypond.org>
2006-09-16 Han-Wen Nienhuys <hanwen@lilypond.org>
+ * scm/define-grobs.scm (all-grob-descriptions): oops, typo:
+ use spanner::set-spacing-ronds
+
+ * lily/note-column.cc: reformat.
+
* lily/rest-collision.cc (calc_positioning_done): fix whole/half
step positioning for note/rest combinations.
* lily/rest-collision.cc (calc_positioning_done): fix whole/half
step positioning for note/rest combinations.
Paper_column::less_than (Grob *const &a,
Grob *const &b)
{
Paper_column::less_than (Grob *const &a,
Grob *const &b)
{
- return dynamic_cast<Paper_column*> (a)->rank_ < dynamic_cast<Paper_column*> (b)->rank_;
+ Paper_column *pa = dynamic_cast<Paper_column*> (a);
+ Paper_column *pb = dynamic_cast<Paper_column*> (b);
+
+ return pa->rank_ < pb->rank_;
Spanner *sp = dynamic_cast<Spanner *> (me);
r.item_drul_[LEFT] = sp->get_bound (LEFT);
r.item_drul_[RIGHT] = sp->get_bound (RIGHT);
Spanner *sp = dynamic_cast<Spanner *> (me);
r.item_drul_[LEFT] = sp->get_bound (LEFT);
r.item_drul_[RIGHT] = sp->get_bound (RIGHT);
- r.distance_
- = robust_scm2double (me->get_property ("minimum-length"), 0);
+ SCM num_length = me->get_property ("minimum-length");
+ if (scm_is_number (num_length))
+ {
+ r.distance_ = robust_scm2double (num_length, 0);
+ r.add_to_cols ();
+ }
+
return SCM_UNSPECIFIED;
}
return SCM_UNSPECIFIED;
}
(Tie
. (
(control-points . ,ly:tie::calc-control-points)
(Tie
. (
(control-points . ,ly:tie::calc-control-points)
- (springs-and-rods . ,ly:spacing-spanner::set-springs)
+ (springs-and-rods . ,ly:spanner::set-spacing-rods)
(avoid-slur . inside)
(direction . ,ly:tie::calc-direction)
(stencil . ,ly:tie::print)
(avoid-slur . inside)
(direction . ,ly:tie::calc-direction)
(stencil . ,ly:tie::print)
(outer-tie-vertical-gap . 0.25)
(multi-tie-region-size . 1)
(between-length-limit . 1.0)))
(outer-tie-vertical-gap . 0.25)
(multi-tie-region-size . 1)
(between-length-limit . 1.0)))
(thickness . 1.2)
(line-thickness . 0.8)
(meta . ((class . Spanner)
(thickness . 1.2)
(line-thickness . 0.8)
(meta . ((class . Spanner)