X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fstencil.cc;h=3da186954132a5cfc3940471e116671bac07faf0;hb=905109ea0e90efa8d9c1ba02769e458a0707cc47;hp=987a879053dd808f7775c4b52ae94eb1d7438b09;hpb=626874c8eecfbeb04ca8ffec3fb78da48859b42f;p=lilypond.git diff --git a/lily/stencil.cc b/lily/stencil.cc index 987a879053..3da1869541 100644 --- a/lily/stencil.cc +++ b/lily/stencil.cc @@ -104,10 +104,10 @@ Stencil::rotate_degrees_absolute (Real a, Offset absolute_off) * *this = rotated() */ - expr_ = scm_list_n (ly_symbol2scm ("rotate-stencil"), + expr_ = scm_list_3 (ly_symbol2scm ("rotate-stencil"), scm_list_2 (scm_from_double (a), scm_cons (scm_from_double (x), scm_from_double (y))), - expr_, SCM_UNDEFINED); + expr_); /* * Calculate the new bounding box @@ -167,9 +167,9 @@ Stencil::translate (Offset o) } if (!scm_is_null (expr_)) - expr_ = scm_list_n (ly_symbol2scm ("translate-stencil"), + expr_ = scm_list_3 (ly_symbol2scm ("translate-stencil"), ly_offset2scm (o), - expr_, SCM_UNDEFINED); + expr_); dim_.translate (o); }