* lily/include/lily-guile.hh: rename ly_c_X_p -> ly_is_X

[lilypond.git] / lily / system.cc

diff --git a/lily/system.cc b/lily/system.cc
index cf011b16cea906fd0d3e3cde8a6c48c5719805b0..2a88a4ae3c8968a2d532aa4cac33e2d908ddeeaf 100644 (file)
--- a/lily/system.cc
+++ b/lily/system.cc
@@ -243,7 +243,7 @@ System::pre_processing ()
     {
       Grob *e = unsmob_grob (scm_car (s));
       SCM proc = e->get_property ("spacing-procedure");
-      if (ly_c_procedure_p (proc))
+      if (ly_is_procedure (proc))
        scm_call_1 (proc, e->self_scm ());
     }
 }