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

[lilypond.git] / lily / system.cc

diff --git a/lily/system.cc b/lily/system.cc
index 87373b5de83405b0dc93d0884aa8d0218b587e78..503a81b28bf8b44ed855000e2cc0c1081cc18c18 100644 (file)
--- a/lily/system.cc
+++ b/lily/system.cc
@@ -369,7 +369,7 @@ System::get_line ()
                Grob *col = it->get_column ();
                SCM s = col->get_property ("page-penalty");
                // FIXME; page breaking is not discrete at +-10000
-               if (is_number (s)) // && fabs (ly_scm2double (s)) < 10000)
+               if (ly_c_number_p (s)) // && fabs (ly_scm2double (s)) < 10000)
                  penalty += ly_scm2double (s);
              }
          }