Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-21 06:02:32 -05:00
Code Issues Activity

Allow passing custom cache atom

Browse source
This commit is contained in:
Florian Schroedl 2024-06-12 17:14:27 +02:00
parent 908cc2240f
commit 9bc48a3a1a
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
frontend/src/app/main/ui/workspace/tokens/style_dictionary.cljs
View file

@ -91,12 +91,13 @@
This hook will return the unresolved tokens as state until they are processed,
then the state will be updated with the resolved tokens."
[tokens]
(let [tokens-state (mf/use-state (get @!tokens-cache tokens tokens))]
[tokens & {:keys [cache-atom]
:or {cache-atom !tokens-cache}}]
(let [tokens-state (mf/use-state (get @cache-atom tokens tokens))]
(mf/use-effect
(mf/deps tokens)
(fn []
(let [cached (get @!tokens-cache tokens)]
(let [cached (get @cache-atom tokens)]
(cond
;; The tokens are already processing somewhere
(p/promise? cached) (p/then cached #(reset! tokens-state %))
@ -104,9 +105,9 @@
(some? cached) (reset! tokens-state cached)
;; No cached entry, start processing
:else (let [promise+ (resolve-tokens+ tokens)]
(swap! !tokens-cache assoc tokens promise+)
(swap! cache-atom assoc tokens promise+)
(p/then promise+ (fn [resolved-tokens]
(swap! !tokens-cache assoc tokens resolved-tokens)
(swap! cache-atom assoc tokens resolved-tokens)
(reset! tokens-state resolved-tokens))))))))
@tokens-state))