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

[lilypond.git] / lily / event.cc

diff --git a/lily/event.cc b/lily/event.cc
index 7a1b9c6a7b2b4f257b74a3931b145d1f92f3bc99..c52a0701afe747daed22b6a9620759b9c50656e8 100644 (file)
--- a/lily/event.cc
+++ b/lily/event.cc
@@ -195,7 +195,7 @@ alist_equal_p (SCM a, SCM b)
       SCM l = scm_assoc (key, b);
 
       if (l == SCM_BOOL_F
-         || !is_equal ( ly_cdr (l), val))
+         || !ly_c_equal_p ( ly_cdr (l), val))
 
        return false;
     }