3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-17 15:26:10 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Paste on position in grid

Browse source
This commit is contained in:
alonso.torres 2023-05-22 15:34:01 +02:00
parent 714b2c8805
commit 0e152bb7f9
2 changed files with 26 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

15
common/src/app/common/types/shape/layout.cljc
View file

@ -994,3 +994,18 @@
(-> parent
(assoc-in [:layout-grid-cells id-from :shapes] (dm/get-in parent [:layout-grid-cells id-to :shapes]))
(assoc-in [:layout-grid-cells id-to :shapes] (dm/get-in parent [:layout-grid-cells id-from :shapes]))))
(defn add-children-to-cell
[frame children objects [row column :as cell]]
(let [;; Temporary remove the children when moving them
frame (-> frame
(update :shapes #(d/removev children %))
(assign-cells))
children (->> children (remove #(layout-absolute? objects %)))]
(-> frame
(update :shapes d/concat-vec children)
(cond-> (some? cell)
(push-into-cell children row column))
(assign-cells))))