X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fbreak-align-engraver.cc;h=dcce285bdfa0492fe61b2081c9c26d0b0fe8000f;hb=cc18fd6f82df460cc31695c4c31f47f45b7e434e;hp=12e14293b1e96fd44c7d143509811e3cea5990fc;hpb=7f6816438d66f6d70db5b68454d80656a0f3f131;p=lilypond.git diff --git a/lily/break-align-engraver.cc b/lily/break-align-engraver.cc index 12e14293b1..dcce285bdf 100644 --- a/lily/break-align-engraver.cc +++ b/lily/break-align-engraver.cc @@ -3,7 +3,7 @@ source file of the GNU LilyPond music typesetter - (c) 1999--2005 Han-Wen Nienhuys + (c) 1999--2006 Han-Wen Nienhuys */ #include "engraver.hh" #include "protected-scm.hh" @@ -12,6 +12,7 @@ #include "axis-group-interface.hh" #include "context.hh" #include "translator-group.hh" +#include "item.hh" #include "translator.icc" @@ -27,8 +28,7 @@ protected: virtual void derived_mark () const; public: TRANSLATOR_DECLARATIONS (Break_align_engraver); - DECLARE_ACKNOWLEDGER(break_aligned); - + DECLARE_ACKNOWLEDGER (break_aligned); }; void @@ -64,31 +64,26 @@ Break_align_engraver::acknowledge_break_aligned (Grob_info inf) if (item->get_parent (X_AXIS)) return; - SCM bp = item->get_property ("breakable"); - bool breakable = (to_boolean (bp)); - if (!breakable) + if (!Item::is_non_musical (item)) return; SCM align_name = item->get_property ("break-align-symbol"); if (!scm_is_symbol (align_name)) return; - + if (!align_) { align_ = make_item ("BreakAlignment", SCM_EOL); Context *origin = inf.origin_contexts (this)[0]; - Translator_group *tg = origin ->implementation (); - Engraver *random_source = dynamic_cast (unsmob_translator (scm_car (tg->get_simple_trans_list ()))); + Translator_group *tg = origin->implementation (); + Engraver *random_source = dynamic_cast (unsmob_translator (scm_car (tg->get_simple_trans_list ()))); /* Make left edge appear to come from same context as clef/bar-line etc. - */ - left_edge_ = make_item_from_properties (random_source, - ly_symbol2scm ("LeftEdge"), - SCM_EOL, - "LeftEdge"); + */ + left_edge_ = random_source->make_item ("LeftEdge", SCM_EOL); add_to_group (left_edge_->get_property ("break-align-symbol"), left_edge_); } @@ -117,16 +112,17 @@ Break_align_engraver::add_to_group (SCM align_name, Item *item) column_alist_ = scm_assoc_set_x (column_alist_, align_name, group->self_scm ()); - Break_align_interface::add_element (align_, group); + Break_alignment_interface::add_element (align_, group); } Axis_group_interface::add_element (group, item); } -ADD_ACKNOWLEDGER(Break_align_engraver, break_aligned); +ADD_ACKNOWLEDGER (Break_align_engraver, break_aligned); ADD_TRANSLATOR (Break_align_engraver, "Align grobs with corresponding @code{break-align-symbols} into " "groups, and order the groups according to @code{breakAlignOrder}. " "The left edge of the alignment gets a separate group, with a symbol @code{left-edge}. ", - /* creats*/ "BreakAlignment BreakAlignGroup LeftEdge", - /* accepts */ "", - /* reads */ "", + /* create */ "BreakAlignment " + "BreakAlignGroup " + "LeftEdge ", + /* read */ "", /* write */ "");