[#15] Update events example

clojerl · Nov 25, 2018 · 16e9a8a · 16e9a8a
1 parent 89d22e5
commit 16e9a8a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/doodler/examples/events.clje b/src/doodler/examples/events.clje
@@ -25,7 +25,8 @@
   (d/stroke (d/random 255))
   (d/stroke-weight (d/random 10))
   (d/fill (d/random 255))
-  (d/circle (:x state) (:y state) (d/random 50)))
+  (let [diam (d/random 50)]
+    (d/ellipse (:x state) (:y state) diam diam)))
 
 (d/defsketch sketch
   :title "Handling events"