Enable drawing new canvas.

This commit is contained in:
Andrey Antukh 2019-08-24 16:12:35 +02:00
parent daac4486e5
commit 786aefe7d8

View file

@ -177,6 +177,7 @@
(defn setup-proportions (defn setup-proportions
[shape] [shape]
(case (:type shape) (case (:type shape)
:canvas (setup-proportions-rect shape)
:rect (setup-proportions-rect shape) :rect (setup-proportions-rect shape)
:circle (setup-proportions-rect shape) :circle (setup-proportions-rect shape)
:icon (setup-proportions-image shape) :icon (setup-proportions-image shape)