/*
- break-align-interface.cc -- implement Break_alignment_interface
+ This file is part of LilyPond, the GNU music typesetter.
- source file of the GNU LilyPond music typesetter
+ Copyright (C) 1997--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
- (c) 1997--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ LilyPond is free software: you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
+
+ LilyPond is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
*/
SCM
Break_aligned_interface::calc_break_visibility (SCM smob)
{
- /* a BreakAlignGroup is break-visible iff it has one element that is break-visible */
+ /* a BreakAlignGroup is break-visible if it has one element that is break-visible */
Grob *me = unsmob_grob (smob);
SCM ret = scm_c_make_vector (3, SCM_EOL);
extract_grob_set (me, "elements", elts);
}
ADD_INTERFACE (Break_alignable_interface,
- "Object that is aligned on a break aligment. ",
+ "Object that is aligned on a break alignment.",
/* properties */
"break-align-symbols "
- )
-
-
+ );
ADD_INTERFACE (Break_aligned_interface,
"Items that are aligned in prefatory matter.\n"
"\n"
- "The spacing of these items is controlled by the @code{space-alist}\n"
- "property. It contains a list @code{break-align-symbol}s with a specification\n"
- "of the associated space. The space specification can be "
+ "The spacing of these items is controlled by the"
+ " @code{space-alist} property. It contains a list"
+ " @code{break-align-symbol}s with a specification of the"
+ " associated space. The space specification can be\n"
+ "\n"
"@table @code\n"
"@item (minimum-space . @var{spc}))\n"
- " Pad space until the distance is @var{spc}\n"
+ "Pad space until the distance is @var{spc}.\n"
"@item (fixed-space . @var{spc})\n"
- " Set a fixed space\n"
+ "Set a fixed space.\n"
"@item (semi-fixed-space . @var{spc})\n"
- " Set a space. Half of it is fixed and half is stretchable. \n"
- "(does not work at start of line. fixme)\n"
+ "Set a space. Half of it is fixed and half is stretchable."
+ " (does not work at start of line. fixme)\n"
"@item (extra-space . @var{spc})\n"
- " Add @var{spc} amount of space.\n"
+ "Add @var{spc} amount of space.\n"
"@end table\n"
"\n"
- "Special keys for the alist are @code{first-note} and @code{next-note}, signifying\n"
- "the first note on a line, and the next note halfway a line.\n"
+ "Special keys for the alist are @code{first-note} and"
+ " @code{next-note}, signifying the first note on a line, and"
+ " the next note halfway a line.\n"
"\n"
- "Rules for this spacing are much more complicated than this. \n"
- "See [Wanske] page 126 -- 134, [Ross] pg 143 -- 147\n",
+ "Rules for this spacing are much more complicated than this."
+ " See [Wanske] page 126--134, [Ross] page 143--147.",
/* properties */
"break-align-anchor "
);
ADD_INTERFACE (Break_alignment_interface,
- "The object that performs break aligment. See @ref{break-aligned-interface}.",
+ "The object that performs break alignment. See"
+ " @ref{break-aligned-interface}.",
/* properties */
"positioning-done "
- "break-align-orders");
+ "break-align-orders "
+ );