(LY_DEFINE): use Scheme style naming for

[lilypond.git] / lily / group-interface.cc

diff --git a/lily/group-interface.cc b/lily/group-interface.cc
index a62dde9a9c9f09fdea31a55f6e61761513629cb4..ff1a4a30b680b5554b89a82ac668bb7b03526894 100644 (file)
--- a/lily/group-interface.cc
+++ b/lily/group-interface.cc
@@ -25,7 +25,7 @@ Group_interface::add_thing (Grob*me, String name, SCM thing)
 int
 Group_interface::count (Grob *me, String name)
 {
-  return scm_ilength (me->get_grob_property (name.to_str0 ()));
+  return scm_ilength (me->get_property (name.to_str0 ()));
 }