/*
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",