CalvinBackup/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-03-28 22:32:01 +01:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Convert in copies nested main instances when duplicating

Browse Source
This commit is contained in:
Andrés Moya
2023-11-10 17:24:01 +01:00
parent 69435e32d9
commit 5fb4703d95
2 changed files with 37 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
common/src/app/common/pages/helpers.cljc
View File

@@ -163,12 +163,17 @@
result))))
(defn get-parent-ids-seq
"Returns a vector of parents of the specified shape."
"Returns a sequence of parents of the specified shape."
[objects shape-id]
(let [parent-id (get-parent-id objects shape-id)]
(when (and (some? parent-id) (not= parent-id shape-id))
(lazy-seq (cons parent-id (get-parent-ids-seq objects parent-id))))))
(defn get-parent-ids-seq-with-self
"Returns a sequence of parents of the specified shape, including itself."
[objects shape-id]
(cons shape-id (get-parent-ids-seq objects shape-id)))
(defn get-parents
"Returns a vector of parents of the specified shape."
[objects shape-id]