add bezier dot styles

This commit is contained in:
Juan de la Cruz 2016-12-19 14:09:36 +01:00
parent 1142885656
commit e8fec61afc
2 changed files with 14 additions and 2 deletions

View file

@ -91,10 +91,12 @@
(-> (assoc shape :drawing? true)
(shapes/render-component))
(when-not (:free shape)
[:circle {:cx x
[:circle.close-bezier {:cx x
:cy y
:r 5
:fill "red"
:stroke "#d52747"
:stroke-width "2px"
:style {:cursor "pointer"}
:on-click on-click}])])))
;; --- Drawing Initialization