source file of the GNU LilyPond music typesetter
- (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 2005--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "paper-column-engraver.hh"
#include "international.hh"
#include "axis-group-interface.hh"
#include "context.hh"
-#include "item.hh"
#include "note-spacing.hh"
#include "paper-column.hh"
#include "pointer-group-interface.hh"
SCM mpos = get_property ("measurePosition");
- if (unsmob_moment (mpos))
+ SCM barnum = get_property ("internalBarNumber");
+ if (unsmob_moment (mpos)
+ && scm_is_integer (barnum))
{
- SCM where = scm_cons (get_property ("internalBarNumber"),
+ SCM where = scm_cons (barnum,
mpos);
command_column_->set_property ("rhythmic-location", where);
/* create */
"PaperColumn "
"NonMusicalPaperColumn",
-
- /* accept */ "break-event",
/* read */
"forbidBreak "
,