johanels/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-12-11 22:14:05 +01:00
Code Issues Actions 9 Packages Projects Releases Wiki Activity

Fix trying to update shapes for deleted tokens crash

Browse Source
This commit is contained in:
Florian Schroedl
2024-08-01 11:07:02 +02:00
parent feb438f882
commit cc6f34f78a
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
frontend/src/app/main/ui/workspace/tokens/update.cljs
View File

@@ -55,8 +55,12 @@
[xs resolved-tokens shape]
(-> (reduce
(fn [acc [k v]]
(let [resolved-value (get-in resolved-tokens [v :resolved-value])]
(if (and filter-existing-values? (= (get shape k) resolved-value))
(let [resolved-token (get resolved-tokens v)
resolved-value (get resolved-token :resolved-value)
skip? (or
(not (get resolved-tokens v))
(and filter-existing-values? (= (get shape k) resolved-value)))]
(if skip?
acc
(update acc resolved-value (fnil conj #{}) k))))
{} xs)))