2002-12-30 Juergen Reuter <reuter@ipd.uka.de>

[lilypond.git] / lily / lookup.cc

diff --git a/lily/lookup.cc b/lily/lookup.cc
index db0b03365890c9275a3ed7a7cfa7893551f699e1..5695c4921ef731c610b5566fe01e8e58416876f9 100644 (file)
--- a/lily/lookup.cc
+++ b/lily/lookup.cc
@@ -297,7 +297,7 @@ Lookup::round_filled_polygon (Array<Offset> points, Real blotdiameter)
       box.add_point (points[i]);
     }
   SCM polygon_scm = scm_list_n (ly_symbol2scm ("polygon"),
-                               ly_quote_scm (ly_quote_scm (shrinked_points_scm)),
+                               ly_quote_scm (shrinked_points_scm),
                                gh_double2scm (blotdiameter),
                                SCM_UNDEFINED);