]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/group-interface.cc
(set_spacing_rods): new
[lilypond.git] / lily / group-interface.cc
index e518792ef82d054bd20015fb35f76a6ee805764c..95d388cc0716becf0ce4db0e04c26c9f3774bd0d 100644 (file)
@@ -1,13 +1,13 @@
 /*   
-  group-interface.cc --  implement Group_interface
+  group-interface.cc -- implement Group_interface
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 1999--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1999--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   
  */
+
 #include "group-interface.hh"
-#include "grob.hh"
 
 void
 Group_interface::add_thing (Grob*me, SCM sym, SCM thing)
@@ -16,16 +16,10 @@ Group_interface::add_thing (Grob*me, SCM sym, SCM thing)
 }
 
 
-void
-Group_interface::add_thing (Grob*me, String name, SCM thing)
-{
-  add_thing (me, ly_symbol2scm (name.to_str0 ()), thing);
-}
-
 int
-Group_interface::count (Grob *me, String name)
+Group_interface::count (Grob *me, SCM sym)
 {
-  return scm_ilength (me->get_grob_property (name.to_str0 ()));
+  return scm_ilength (me->internal_get_property (sym));
 }