* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.

[lilypond.git] / lily / recording-group-engraver.cc

diff --git a/lily/recording-group-engraver.cc b/lily/recording-group-engraver.cc
index 42be7b9eb5dc33d7a52e12446e5d96bc1b1774f3..95be8f56380eb37a87f44723726d5a7dfbf75a1e 100644 (file)
--- a/lily/recording-group-engraver.cc
+++ b/lily/recording-group-engraver.cc
@@ -80,7 +80,7 @@ Recording_group_engraver::finalize ()
   Engraver_group_engraver::finalize ();
   SCM proc = get_property ("recordEventSequence");
 
-  if (is_procedure (proc))
+  if (ly_c_procedure_p (proc))
     scm_call_2  (proc, get_parent_context ()->self_scm (), ly_cdr (accumulator_));
 
   accumulator_ = SCM_EOL;