source file of the GNU LilyPond music typesetter
- (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 2005--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "grid-line-interface.hh"
#include "pointer-group-interface.hh"
#include "lookup.hh"
#include "output-def.hh"
-#include "stencil.hh"
MAKE_SCHEME_CALLBACK (Grid_line_interface, print, 1);
SCM
Grob *refp = common_refpoint_of_array (elts, me, Y_AXIS);
Interval iv;
- for (int i = 0; i < elts.size (); i++)
+ for (vsize i = 0; i < elts.size (); i++)
{
Grob *point = elts[i];
return SCM_EOL;
}
- Real staffline = me->layout ()->get_dimension (ly_symbol2scm ("linethickness"));
+ Real staffline = me->layout ()->get_dimension (ly_symbol2scm ("line-thickness"));
Real thick = robust_scm2double (me->get_property ("thickness"), 1.0)
* staffline;
{
Grob *me = unsmob_grob (smob);
- Real staffline = me->layout ()->get_dimension (ly_symbol2scm ("linethickness"));
+ Real staffline = me->layout ()->get_dimension (ly_symbol2scm ("line-thickness"));
Real thick = robust_scm2double (me->get_property ("thickness"), 1.0)
* staffline;
Pointer_group_interface::add_grob (me, ly_symbol2scm ("elements"), b);
}
-ADD_INTERFACE (Grid_line_interface, "grid-line-interface",
- "A line that spanned between grid-points. ",
- "elements thickness");
+ADD_INTERFACE (Grid_line_interface,
+ "A line that is spanned between grid-points.",
-ADD_INTERFACE (Grid_point_interface, "grid-point-interface",
- "A spanning point for grid lines. ",
- "");
+ /* properties */
+ "elements "
+ "thickness "
+ );
+
+ADD_INTERFACE (Grid_point_interface,
+ "A spanning point for grid lines.",
+
+ /* properties */
+ ""
+ );