3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-01 14:01:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

Remove unused code.

Browse source
This commit is contained in:
Andrey Antukh 2017-03-01 20:08:49 +01:00
parent bfd99ebb8f
commit 8245ea0bdc
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
2 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
frontend/src/uxbox/main/data/shapes.cljs
View file

@ -585,10 +585,8 @@
ptk/UpdateEvent ptk/UpdateEvent
(update [_ state] (update [_ state]
(let [pid (get-in state [:workspace :page]) (let [pid (get-in state [:workspace :page])
used-names (map #(get-in state [:shapes % :name])
(get-in state [:pages pid :shapes]))
selected (get-in state [:workspace :selected])] selected (get-in state [:workspace :selected])]
(impl/group-shapes state selected used-names pid))))) (impl/group-shapes state selected pid)))))
(defn degroup-selected (defn degroup-selected
[] []

2
frontend/src/uxbox/main/data/shapes_impl.cljs
View file

@ -310,7 +310,7 @@
(reduce match #{} (sequence xf shapes)))) (reduce match #{} (sequence xf shapes))))
(defn group-shapes (defn group-shapes
[state shapes used-names page] [state shapes page]
(letfn [(replace-first-item [pred coll replacement] (letfn [(replace-first-item [pred coll replacement]
(into [] (into []
(concat (concat