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

[lilypond.git] / lily / line-interface.cc

diff --git a/lily/line-interface.cc b/lily/line-interface.cc
index cbcf9b02edb4dae613e5c0e1a87e63c42c3e57c2..317df83495b5e2c434e2b364e04469fce768147f 100644 (file)
--- a/lily/line-interface.cc
+++ b/lily/line-interface.cc
@@ -73,7 +73,7 @@ Line_interface::line (Grob *me, Offset from, Offset to)
   SCM type = me->get_property ("style");
 
   SCM dash_fraction = me->get_property ("dash-fraction");
-  if (is_number (dash_fraction) || type == ly_symbol2scm ("dotted-line"))
+  if (ly_c_number_p (dash_fraction) || type == ly_symbol2scm ("dotted-line"))
     {
       
       Real fraction