Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-13 10:38:13 -05:00
Code Issues Activity

🎉 Auto select pasted objects

Browse source
This commit is contained in:
Andrés Moya 2020-03-31 15:25:29 +02:00
parent a4d8675a15
commit 637f0934f9
1 changed files with 11 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -2056,6 +2056,8 @@
(rx/ignore)))))))
(declare select-pasted-objs)
(defn- paste-impl
[{:keys [selected objects] :as data}]
(letfn [(prepare-changes [state delta]
@ -2129,7 +2131,8 @@
rchanges)]
(rx/of (commit-changes (vec rchanges)
(vec (reverse uchanges))
{:commit-local? true})))))))
{:commit-local? true})
(select-pasted-objs rchanges)))))))
(def paste
(ptk/reify ::paste
@ -2144,6 +2147,13 @@
(js/console.error "Clipboard blocked:" err)
(rx/empty)))))))
(defn select-pasted-objs
[rchanges]
(ptk/reify ::select-pasted-objs
ptk/UpdateEvent
(update [_ state]
(assoc-in state [:workspace-local :selected]
(map #(get-in % [:obj :id]) rchanges)))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Page Changes Reactions