short-circuit the qdg/draw routine for triangle

dgtized · Jan 29, 2024 · c72d21a · c72d21a
1 parent d3d3604
commit c72d21a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/shimmers/common/quil_draws_geom.cljc b/src/shimmers/common/quil_draws_geom.cljc
@@ -45,8 +45,8 @@
 
 (extend-type Triangle2
   QuilDrawGeom
-  (draw [s]
-    (apply cq/draw-triangle (:points s)))
+  (draw [{[[ax ay] [bx by] [cx cy]] :points}]
+    (q/triangle ax ay bx by cx cy))
   (contour-draw [s] (draw-contour (:points s))))
 
 (extend-type Polygon2