Disable close path anchor on free drawing mode.

This commit is contained in:
Andrey Antukh 2016-08-28 10:22:19 +03:00
parent 9e41946a05
commit d6d38d207d
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95

View file

@ -89,11 +89,12 @@
[:g [:g
(-> (assoc shape :drawing? true) (-> (assoc shape :drawing? true)
(shapes/render-component)) (shapes/render-component))
(when-not (:free shape)
[:circle {:cx x [:circle {:cx x
:cy y :cy y
:r 5 :r 5
:fill "red" :fill "red"
:on-click on-click}]]))) :on-click on-click}])])))
;; --- Drawing Initialization ;; --- Drawing Initialization