]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/axis-group-interface.cc
New upstream version 2.19.80
[lilypond.git] / lily / axis-group-interface.cc
index 38a193caf63dfc4659dc10a1245d2c9ab2785c69..564f638841a52014162705d99b41de00c036bf7f 100644 (file)
@@ -946,7 +946,7 @@ Axis_group_interface::skyline_spacing (Grob *me)
       vector<Grob *> current_elts;
       current_elts.push_back (elements[i]);
       while (i + 1 < elements.size ()
-             && scm_is_eq (elements[i + 1]->get_property ("outside-staff-priority"), priority))
+             && ly_is_equal (elements[i + 1]->get_property ("outside-staff-priority"), priority))
         {
           if (!to_boolean (elements[i + 1]->get_property ("cross-staff")))
             current_elts.push_back (elements[i + 1]);
@@ -988,9 +988,9 @@ Axis_group_interface::print (SCM smob)
   if (Skyline_pair *s = unsmob<Skyline_pair> (me->get_property ("vertical-skylines")))
     {
       ret.add_stencil (Lookup::points_to_line_stencil (0.1, (*s)[UP].to_points (X_AXIS))
-                       .in_color (255, 0, 255));
+                       .in_color (1.0, 0.0, 1.0));
       ret.add_stencil (Lookup::points_to_line_stencil (0.1, (*s)[DOWN].to_points (X_AXIS))
-                       .in_color (0, 255, 255));
+                       .in_color (0.0, 1.0, 1.0));
     }
   return ret.smobbed_copy ();
 }