* mf/GNUmakefile: always trace pfa fonts.

[lilypond.git] / lily / cluster.cc

diff --git a/lily/cluster.cc b/lily/cluster.cc
index 424e1d248bd8057cf400bd5b49d3df6ac880288b..a6caf0a7d5b15fa9c91bd9156e2b9939b2af4b8a 100644 (file)
--- a/lily/cluster.cc
+++ b/lily/cluster.cc
@@ -180,7 +180,7 @@ Cluster::brew_molecule (SCM smob)
       SCM posns = col->get_grob_property ("positions");
       
       Slice s (0,0);
-      if (ly_number_pair_p (posns))
+      if (is_number_pair (posns))
        s = Slice (gh_scm2int (gh_car (posns)),
                   gh_scm2int (gh_cdr (posns)));
 
@@ -206,7 +206,7 @@ Cluster::brew_molecule (SCM smob)
              SCM posns = col->get_grob_property ("positions");
       
              Slice s (0,0);
-             if (ly_number_pair_p (posns))
+             if (is_number_pair (posns))
                s = Slice (gh_scm2int (gh_car (posns)),
                           gh_scm2int (gh_cdr (posns)));