]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/tuplet-bracket.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / tuplet-bracket.cc
index 3bdfe4bf6f0f7c6e8c6684b10e34ee034dfc657c..ba44e4446ba12c84bbaa8fb8fe25a87cc71f51f3 100644 (file)
@@ -133,7 +133,7 @@ Tuplet_bracket::print (SCM smob)
     Fixme: the type of this prop is sucky.
    */
   SCM bracket = me->get_property ("bracket-visibility");
-  if (is_boolean (bracket))
+  if (ly_c_boolean_p (bracket))
     {
       bracket_visibility = ly_scm2bool (bracket);
     }
@@ -141,7 +141,7 @@ Tuplet_bracket::print (SCM smob)
     bracket_visibility = !par_beam;
 
   SCM numb = me->get_property ("number-visibility");  
-  if (is_boolean (numb))
+  if (ly_c_boolean_p (numb))
     {
       number_visibility = ly_scm2bool (numb);
     }