X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstanza-number-engraver.cc;h=d9887cfefd2686f17a5bbbd4066f78bab9c0c513;hb=de658c9789658317b265eb7f3fd34a87c7a8f953;hp=a80f0141efe8635d6def456e3142beb488c4c046;hpb=d9b43b93f2c885409bafdb157138158f65cc49aa;p=lilypond.git diff --git a/lily/stanza-number-engraver.cc b/lily/stanza-number-engraver.cc index a80f0141ef..d9887cfefd 100644 --- a/lily/stanza-number-engraver.cc +++ b/lily/stanza-number-engraver.cc @@ -3,14 +3,14 @@ source file of the GNU LilyPond music typesetter - (c) 2000--2002 Han-Wen Nienhuys , Glen Prideaux + (c) 2000--2003 Han-Wen Nienhuys , Glen Prideaux Similar to (and derived from) Instrument_name_engraver. */ #include "engraver.hh" #include "item.hh" -#include "bar.hh" +#include "bar-line.hh" class Stanza_number_engraver : public Engraver { @@ -48,7 +48,7 @@ Stanza_number_engraver::process_music () if (gh_string_p (s) || gh_pair_p (s)) /* - if (i.grob_l_->has_interface (symbol ("lyric-syllable-interface"))) + if (i.grob_->internal_has_interface (symbol ("lyric-syllable-interface"))) Tried catching lyric items to generate stanza numbers, but it spoils lyric spacing. @@ -84,7 +84,7 @@ Stanza_number_engraver::create_text (SCM txt) { text_ = new Item (get_property ("StanzaNumber")); text_->set_grob_property ("text", txt); - announce_grob (text_,0); + announce_grob (text_, SCM_EOL); } } @@ -94,6 +94,7 @@ Stanza_number_engraver::create_text (SCM txt) ENTER_DESCRIPTION(Stanza_number_engraver, /* descr */ "", /* creats*/ "StanzaNumber", -/* acks */ "", +/* accepts */ "", +/* acks */ "", /* reads */ "stz stanza", /* write */ "");