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

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

@ -270,24 +270,31 @@
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
(mf/deps theme-state on-submit) (fn [field value]
(fn [e] (swap! theme-state #(assoc % field value))))
(dom/prevent-default e)
(let [theme (-> @theme-state on-save-form
(update :name str/trim) (mf/use-callback
(update :group str/trim) (mf/deps theme-state on-submit)
(update :description str/trim))] (fn [e]
(when-not (str/empty? (:name theme)) (dom/prevent-default e)
(on-submit theme))) (let [theme (-> @theme-state
(on-back))) (update :name str/trim)
(update :group str/trim)
(update :description str/trim))]
(when-not (str/empty? (:name theme))
(on-submit theme)))
(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,23 +303,30 @@
(on-back))) (on-back)))
;; Sets tree handlers ;; Sets tree handlers
token-set-group-active? (mf/use-callback token-set-group-active?
(mf/deps theme-state) (mf/use-callback
(fn [prefixed-path] (mf/deps theme-state)
(ctob/sets-at-path-all-active? lib prefixed-path))) (fn [prefixed-path]
token-set-active? (mf/use-callback (ctob/sets-at-path-all-active? lib prefixed-path)))
(mf/deps theme-state)
(fn [set-name] token-set-active?
(get-in @theme-state [:sets set-name]))) (mf/use-callback
on-toggle-token-set (mf/use-callback (mf/deps theme-state)
(mf/deps theme-state) (fn [set-name]
(fn [set-name] (get-in @theme-state [:sets set-name])))
(swap! theme-state #(ctob/toggle-set % set-name))))
on-click-token-set (mf/use-callback on-toggle-token-set
(mf/deps on-toggle-token-set) (mf/use-callback
(fn [prefixed-set-path-str] (mf/deps theme-state)
(let [set-name (ctob/prefixed-set-path-string->set-name-string prefixed-set-path-str)] (fn [set-name]
(on-toggle-token-set set-name))))] (swap! theme-state #(ctob/toggle-set % set-name))))
on-click-token-set
(mf/use-callback
(mf/deps on-toggle-token-set)
(fn [prefixed-set-path-str]
(let [set-name (ctob/prefixed-set-path-string->set-name-string prefixed-set-path-str)]
(on-toggle-token-set set-name))))]
[:div {:class (stl/css :themes-modal-wrapper)} [:div {:class (stl/css :themes-modal-wrapper)}
[:> heading* {:level 2 :typography "headline-medium" :class (stl/css :themes-modal-title)} [:> heading* {:level 2 :typography "headline-medium" :class (stl/css :themes-modal-title)}