X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fhairpin.cc;fp=lily%2Fhairpin.cc;h=87f32017a491ca7b9d6a669bf8e25fa4c3c45c10;hb=00e3e15364b9d3c94cda1bcab9f889bb95f6832d;hp=20808956ae9607264d9ee84699bf778835e19cd2;hpb=14c5f7683efc21f5cd168a713a34b3362f8c6d67;p=lilypond.git diff --git a/lily/hairpin.cc b/lily/hairpin.cc index 20808956ae..87f32017a4 100644 --- a/lily/hairpin.cc +++ b/lily/hairpin.cc @@ -236,7 +236,7 @@ Hairpin::print (SCM smob) Box extent (Interval (-rad, rad), Interval (-rad, rad)); /* Hmmm, perhaps we should have a Lookup::circle () method? */ - Stencil circle(extent, + Stencil circle (extent, scm_list_4 (ly_symbol2scm ("circle"), scm_from_double (rad), scm_from_double (thick),