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

Merge pull request #2379 from penpot/hiru-gc-deleted-comp

Browse Source 
✨ Add garbage collect of deleted components
This commit is contained in:
Andrey Antukh
2022-10-04 13:59:53 +02:00
committed by GitHub
parent a08b9adeee 687e4dce2a
commit fc01acffc7
3 changed files with 89 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
common/src/app/common/types/file.cljc
View File

@@ -223,6 +223,18 @@
[[asset instances]])))
assets-seq)))
(defn used-in?
"Checks if a specific asset is used in a given file (by any shape in its pages or in
the components of the local library)."
[file-data library-id asset asset-type]
(letfn [(used-in-shape? [shape]
(uses-asset? asset-type shape library-id asset))
(used-in-container? [container]
(some used-in-shape? (ctn/shapes-seq container)))]
(some used-in-container? (containers-seq file-data))))
(defn get-or-add-library-page
"If exists a page named 'Library backup', get the id and calculate the position to start
adding new components. If not, create it and start at (0, 0)."