]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/script-column.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / script-column.cc
index 2f059721abbfacc3d39a0f16d7e310047e68afc1..52e5adcd0dbdbbe07f76b647a369c82987aad796 100644 (file)
@@ -15,7 +15,7 @@ void
 Script_column::add_staff_sided (Grob *me, Item *i)
 {
   SCM p = i->get_property ("script-priority");
-  if (!is_number (p))
+  if (!ly_c_number_p (p))
     return;
 
   Pointer_group_interface::add_grob (me, ly_symbol2scm ("scripts"),i);