* lily/grob.cc: chang extent-[XY] to [XY]-extent globally.
+2002-08-09 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+
+ * input/test/preset-extent.ly (texidoc): added file.
+
+ * scripts/convert-ly.py: add extent rule.
+
+ * lily/grob.cc: chang extent-[XY] to [XY]-extent globally.
+
2002-08-09 Jan Nieuwenhuizen <janneke@gnu.org>
* stepmake/stepmake/python-module-rules.make:
# force these: Make can't know these have to be generated in advance
$(outdir)/my-lily-parser.o: $(outdir)/parser.hh
$(outdir)/my-lily-lexer.o: $(outdir)/parser.hh
-$(outdir)/lexer.o: $(outdir)/parser.hh
+$(outdir)/lexer.o: $(outdir)/parser.hh $(outdir)/version.hh
$(outdir)/kpath.o: $(outdir)/version.hh
$(outdir)/lily-guile.o: $(outdir)/version.hh
&& gh_number_p (ly_cdr (dims)))
{
staffline_->set_extent (Grob::preset_extent_proc, Y_AXIS);
- staffline_->set_grob_property ("extent-Y", dims);
+ staffline_->set_grob_property ("Y-extent", dims);
}
dims = get_property ("minimumVerticalExtent");
if (gh_pair_p (dims) && gh_number_p (ly_car (dims))
&& gh_number_p (ly_cdr (dims)))
- staffline_->set_grob_property ("minimum-extent-Y", dims);
+ staffline_->set_grob_property ("minimum-Y-extent", dims);
dims = get_property ("extraVerticalExtent");
if (gh_pair_p (dims) && gh_number_p (ly_car (dims))
&& gh_number_p (ly_cdr (dims)))
- staffline_->set_grob_property ("extra-extent-Y", dims);
+ staffline_->set_grob_property ("extra-Y-extent", dims);
Grob * it = unsmob_grob (get_property ("currentCommandColumn"));
Axis a = (Axis) gh_scm2int (scm_axis);
SCM ext = s->get_grob_property ((a == X_AXIS)
- ? "extent-X"
- : "extent-Y");
+ ? "X-extent"
+ : "Y-extent");
if (gh_pair_p (ext))
{
ext = ly_scm2interval (d->dimension_);
SCM extra = get_grob_property (a == X_AXIS
- ? "extra-extent-X"
- : "extra-extent-Y");
+ ? "extra-X-extent"
+ : "extra-Y-extent");
/*
signs ?
}
extra = get_grob_property (a == X_AXIS
- ? "minimum-extent-X"
- : "minimum-extent-Y");
+ ? "minimum-X-extent"
+ : "minimum-Y-extent");
if (gh_pair_p (extra))
{
ext.unite (Interval (gh_scm2double (ly_car (extra)),
",
"X-offset-callbacks Y-offset-callbacks X-extent-callback molecule cause
Y-extent-callback molecule-callback extra-offset spacing-procedure
-staff-symbol interfaces dependencies extent-X extent-Y extra-extent-X
+staff-symbol interfaces dependencies X-extent Y-extent extra-X-extent
causes meta layer before-line-breaking-callback
-after-line-breaking-callback extra-extent-Y minimum-extent-X
-minimum-extent-Y transparent");
+after-line-breaking-callback extra-Y-extent minimum-X-extent
+minimum-Y-extent transparent");
Interval
Separation_item::width (Grob *me)
{
- SCM sw = me->get_grob_property ("extent-X");
+ SCM sw = me->get_grob_property ("X-extent");
if (ly_number_pair_p (sw))
{
return ly_scm2interval (sw);
}
- me->set_grob_property ("extent-X", ly_interval2scm (w));
+ me->set_grob_property ("X-extent", ly_interval2scm (w));
return w;
an item to get dependencies correct. It can't be an grob_group
since these usually are in a different X_group
",
- "extent-X conditional-elements elements");
+ "X-extent conditional-elements elements");
conversions.append (((1,5,68), conv, 'ly-set-X-property -> ly-set-X-property!'))
+if 1:
+ def conv (str):
+ str = re.sub ('extent-X', 'X-extent', str)
+ str = re.sub ('extent-Y', 'Y-extent', str)
+ return str
+
+ conversions.append (((1,5,71), conv, 'extent-[XY] -> [XY]-extent'))
+
+
################################
# END OF CONVERSIONS
################################