Develop RectangularGeometry return

GiovineItalia · Mar 23, 2019 · 8339918 · 8339918
1 parent e9f19bd
commit 8339918
Showing 1 changed file with 7 additions and 4 deletions.
diff --git a/src/geom/rect.jl b/src/geom/rect.jl
@@ -86,11 +86,14 @@ function render(geom::RectangularGeometry, theme::Gadfly.Theme, aes::Gadfly.Aest
         polys[i] = Tuple{Measure, Measure}[(x0, y0), (x0, y1), (x1, y1), (x1, y0)]
     end
 
+    properties = (
+        stroke(nothing), #TODO: Apply theme attributes.
+        svgclass("geometry"),
+        svgattribute("shape-rendering", "crispEdges"))
+
     return compose!(
         context(),
-        Compose.polygon(polys),
+        Compose.polygon(polys, geom.tag),
         fill(cs),
-        stroke(nothing),
-        svgclass("geometry"),
-        svgattribute("shape-rendering", "crispEdges"))
+        properties...)
 end