]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/gourlay-breaking.cc
* lily/text-item.cc (interpret_string): new file, select font with
[lilypond.git] / lily / gourlay-breaking.cc
index 32839d2433e1233455f0f81754eea5068f840c15..c40047173944a8e47bad490901eed8b2e68a41a7 100644 (file)
@@ -233,7 +233,7 @@ Gourlay_breaking::combine_demerits (Column_x_positions const &prev,
   if (pc->original_)
     {
       SCM pen = pc->get_property ("penalty");
-      if (ly_number_p (pen) && fabs (ly_scm2double (pen)) < 10000)
+      if (is_number (pen) && fabs (ly_scm2double (pen)) < 10000)
        {
          break_penalties += ly_scm2double (pen);
        }