source file of the GNU LilyPond music typesetter
- (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>, Glen Prideaux <glenprideaux@iname.com>
+ (c) 2000--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>, Glen Prideaux <glenprideaux@iname.com>
*/
#include "engraver.hh"
#include "side-position-interface.hh"
+#include "text-interface.hh"
+#include "item.hh"
class Stanza_number_engraver : public Engraver
{
{
SCM stanza = get_property ("stanza");
- if (scm_is_string (stanza) && stanza != last_stanza_)
+ if (Text_interface::is_markup (stanza)
+ && stanza != last_stanza_)
{
last_stanza_ = stanza;
ADD_TRANSLATOR (Stanza_number_engraver,
/* doc */ "",
/* create */ "StanzaNumber",
- /* accept */ "",
/* read */ "stanza",
/* write */ "");