Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-08 16:18:11 -05:00
Code Issues Activity

Add select-shape event.

Browse source
This commit is contained in:
Andrey Antukh 2015-12-28 20:39:24 +02:00
parent a5dc634e35
commit 311d107b36
1 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
frontend/uxbox/data/workspace.cljs
View file

@ -65,6 +65,18 @@
(-pr-writer [mv writer _] (-pr-writer [mv writer _]
(-write writer "#<event:u.d.w/select-for-drawing>")))) (-write writer "#<event:u.d.w/select-for-drawing>"))))
(defn select-shape
"Mark a shape selected for drawing in the canvas."
[id]
(reify
rs/UpdateEvent
(-apply-update [_ state]
(let [selected (get-in state [:workspace :selected])]
(if (contains? selected id)
(update-in state [:workspace :selected] disj id)
(update-in state [:workspace :selected] conj id))))))
;; TODO: validate shape ;; TODO: validate shape
(defn add-shape (defn add-shape