(LY_DEFINE): use Scheme style naming for

[lilypond.git] / lily / script.cc

diff --git a/lily/script.cc b/lily/script.cc
index 68ec61119f6f0aad27593ea9005f90836b9dd87a..a63c1d2011b5628f4e3f07e55cd91814bc5ed972 100644 (file)
--- a/lily/script.cc
+++ b/lily/script.cc
@@ -22,7 +22,7 @@
 Stencil
 Script_interface::get_stencil (Grob * me, Direction d)
 {
-  SCM s = me->get_grob_property ("script-stencil");
+  SCM s = me->get_property ("script-stencil");
   assert (gh_pair_p (s));
 
   SCM key = ly_car (s);