]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/system-start-delimiter-engraver.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / system-start-delimiter-engraver.cc
index b5988eac2ab31cff528bcc6ac8c0383b248ed19a..5d4c4342b0b752fc2658ef016b905241d476b62c 100644 (file)
@@ -48,11 +48,11 @@ System_start_delimiter_engraver::acknowledge_grob (Grob_info inf)
       /*
        UGH UGH
        */
-      if (ly_c_string_p (gl) && is_equal (gl, scm_makfrom0str  ("brace"))
-         && ly_c_string_p (my_gl) && is_equal (my_gl, scm_makfrom0str  ("bracket")))
+      if (ly_c_string_p (gl) && ly_c_equal_p (gl, scm_makfrom0str  ("brace"))
+         && ly_c_string_p (my_gl) && ly_c_equal_p (my_gl, scm_makfrom0str  ("bracket")))
        inf.grob_->translate_axis (-0.8, X_AXIS); // ugh
-      else if (ly_c_string_p (gl) && is_equal (gl, scm_makfrom0str  ("bracket"))
-              && ly_c_string_p (my_gl) && is_equal (my_gl, scm_makfrom0str  ("bracket")))
+      else if (ly_c_string_p (gl) && ly_c_equal_p (gl, scm_makfrom0str  ("bracket"))
+              && ly_c_string_p (my_gl) && ly_c_equal_p (my_gl, scm_makfrom0str  ("bracket")))
        {
          inf.grob_->translate_axis ( -0.8, X_AXIS); // ugh
          inf.grob_->set_property ("arch-height",