(LY_DEFINE): use Scheme style naming for

[lilypond.git] / lily / text-item.cc

diff --git a/lily/text-item.cc b/lily/text-item.cc
index 0b81994daaf4e920c651fc51efd544ecdf5a64d9..d79cdb16e35550837341bee5535a3537c8e528c9 100644 (file)
--- a/lily/text-item.cc
+++ b/lily/text-item.cc
@@ -60,7 +60,7 @@ Text_item::print (SCM grob)
 {
   Grob * me = unsmob_grob (grob);
   
-  SCM t = me->get_grob_property ("text");
+  SCM t = me->get_property ("text");
   SCM chain = Font_interface::font_alist_chain (me);
   return interpret_markup (me->get_paper ()->self_scm (), chain, t);
 }