Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-07 23:08:24 -05:00
Code Issues Activity

♻ Cleanup

Browse source
This commit is contained in:
Florian Schroedl 2024-12-04 17:36:58 +01:00
parent 8b569005e1
commit 09e5d88835
1 changed files with 44 additions and 30 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
frontend/src/app/main/ui/workspace/tokens/modals/themes.cljs
View file

@ -270,9 +270,14 @@
disabled? (-> (:name @theme-state) disabled? (-> (:name @theme-state)
(str/trim) (str/trim)
(str/empty?)) (str/empty?))
on-change-field (fn [field value]
(swap! theme-state #(assoc % field value))) on-change-field
on-save-form (mf/use-callback (mf/use-fn
(fn [field value]
(swap! theme-state #(assoc % field value))))
on-save-form
(mf/use-callback
(mf/deps theme-state on-submit) (mf/deps theme-state on-submit)
(fn [e] (fn [e]
(dom/prevent-default e) (dom/prevent-default e)
@ -283,11 +288,13 @@
(when-not (str/empty? (:name theme)) (when-not (str/empty? (:name theme))
(on-submit theme))) (on-submit theme)))
(on-back))) (on-back)))
close-modal close-modal
(mf/use-fn (mf/use-fn
(fn [e] (fn [e]
(dom/prevent-default e) (dom/prevent-default e)
(st/emit! (modal/hide)))) (st/emit! (modal/hide))))
on-delete-token on-delete-token
(mf/use-fn (mf/use-fn
(mf/deps theme on-back) (mf/deps theme on-back)
@ -296,19 +303,26 @@
(on-back))) (on-back)))
;; Sets tree handlers ;; Sets tree handlers
token-set-group-active? (mf/use-callback token-set-group-active?
(mf/use-callback
(mf/deps theme-state) (mf/deps theme-state)
(fn [prefixed-path] (fn [prefixed-path]
(ctob/sets-at-path-all-active? lib prefixed-path))) (ctob/sets-at-path-all-active? lib prefixed-path)))
token-set-active? (mf/use-callback
token-set-active?
(mf/use-callback
(mf/deps theme-state) (mf/deps theme-state)
(fn [set-name] (fn [set-name]
(get-in @theme-state [:sets set-name]))) (get-in @theme-state [:sets set-name])))
on-toggle-token-set (mf/use-callback
on-toggle-token-set
(mf/use-callback
(mf/deps theme-state) (mf/deps theme-state)
(fn [set-name] (fn [set-name]
(swap! theme-state #(ctob/toggle-set % set-name)))) (swap! theme-state #(ctob/toggle-set % set-name))))
on-click-token-set (mf/use-callback
on-click-token-set
(mf/use-callback
(mf/deps on-toggle-token-set) (mf/deps on-toggle-token-set)
(fn [prefixed-set-path-str] (fn [prefixed-set-path-str]
(let [set-name (ctob/prefixed-set-path-string->set-name-string prefixed-set-path-str)] (let [set-name (ctob/prefixed-set-path-string->set-name-string prefixed-set-path-str)]