]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/beam.cc
* lily/include/lily-guile.hh: rename ly_c_X_p -> ly_is_X
[lilypond.git] / lily / beam.cc
index 868470c3b52ae07a6339570c3b7ab32f4e49c870..ed5797fbc3722bf2aa8740fc026643ce45f11969 100644 (file)
@@ -72,7 +72,7 @@ Beam::get_beam_translation (Grob *me)
 {
   SCM func = me->get_property ("space-function");
 
-  if (ly_c_procedure_p (func))
+  if (ly_is_procedure (func))
     {
       SCM s = scm_call_2 (func, me->self_scm (), scm_int2num (get_beam_count (me)));
       return scm_to_double (s);