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

[lilypond.git] / lily / balloon.cc

diff --git a/lily/balloon.cc b/lily/balloon.cc
index 6d1b0b07783d0a3fd1f26177ec70f07a15264666..2530038c99891fd182e7a4c169849543f7f6d200 100644 (file)
--- a/lily/balloon.cc
+++ b/lily/balloon.cc
@@ -29,7 +29,7 @@ Balloon_interface::print (SCM smob)
   SCM cb = me->get_property ("balloon-original-callback");
   SCM scm_mol  =  SCM_EOL;
 
-  if (is_procedure (cb))
+  if (ly_c_procedure_p (cb))
     {
       scm_mol = scm_call_1 (cb, smob);
     }