X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstencil-integral.cc;h=b44258b6b1973c19d117626ba769a232467dd7e4;hb=90e4d7057f3857da049dfda3d130017d4719bd6b;hp=ee12c53f3668a951fbf4160b86f30fcf5e74f047;hpb=7738c6fa2759373c05e34b003a7ed521e9382f37;p=lilypond.git diff --git a/lily/stencil-integral.cc b/lily/stencil-integral.cc index ee12c53f36..b44258b6b1 100644 --- a/lily/stencil-integral.cc +++ b/lily/stencil-integral.cc @@ -894,9 +894,8 @@ stencil_dispatcher (vector &boxes, vector stencil_traverser (PangoMatrix trans, SCM expr) { - if (scm_is_null (expr)) - return vector (); - else if (scm_is_eq (expr, ly_string2scm (""))) + if (scm_is_null (expr) + || (scm_is_string (expr) && scm_is_true (scm_string_null_p (expr)))) return vector (); else if (scm_is_eq (scm_car (expr), ly_symbol2scm ("combine-stencil"))) { @@ -944,8 +943,10 @@ stencil_traverser (PangoMatrix trans, SCM expr) return stencil_traverser (trans, scm_caddr (expr)); else if (scm_is_eq (scm_car (expr), ly_symbol2scm ("transparent-stencil"))) return stencil_traverser (trans, scm_cadr (expr)); - else if (scm_is_eq (scm_car (expr), ly_symbol2scm ("id"))) + else if (scm_is_eq (scm_car (expr), ly_symbol2scm ("output-attributes"))) return stencil_traverser (trans, scm_caddr (expr)); + else if (scm_is_eq (scm_car (expr), ly_symbol2scm ("with-outline"))) + return stencil_traverser (trans, scm_cadr (expr)); else { vector out;