Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-22 14:39:45 -05:00
Code Issues Activity

Add description with schema

Browse source
This commit is contained in:
Florian Schroedl 2024-06-25 11:02:21 +02:00
parent d2bdc6c624
commit ca98747dea
1 changed files with 26 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
frontend/src/app/main/ui/workspace/tokens/form.cljs
View file

@ -34,6 +34,10 @@
[:string {:min 1 :max 255}] [:string {:min 1 :max 255}]
non-existing-token-schema]))) non-existing-token-schema])))
(def token-description-schema
(m/schema
[:string {:max 2048}]))
;; Helpers --------------------------------------------------------------------- ;; Helpers ---------------------------------------------------------------------
(defn finalize-name [name] (defn finalize-name [name]
@ -159,8 +163,22 @@
(not value-error?) (not value-error?)
(valid-value? (or @token-resolve-result @value-ref))) (valid-value? (or @token-resolve-result @value-ref)))
;; Description
description-ref (mf/use-var (:description token))
description-errors (mf/use-state nil)
on-update-description (mf/use-callback
(debounce (fn [e]
(let [value (dom/get-target-val e)
errors (m/explain token-description-schema value)]
(reset! description-ref value)
(reset! description-errors errors)
(update-form-touched)))))
valid-description-field? (not @description-errors)
;; Form
disabled? (or (not valid-name-field?) disabled? (or (not valid-name-field?)
(not valid-value-field?))] (not valid-value-field?)
(not valid-description-field?))]
;; on-submit (fn [e] ;; on-submit (fn [e]
;; (dom/prevent-default e) ;; (dom/prevent-default e)
@ -200,9 +218,13 @@
:error/unknown-error "" :error/unknown-error ""
nil "Enter token value" nil "Enter token value"
[:p @token-resolve-result])] [:p @token-resolve-result])]
[:& tokens.common/labeled-input {:label "Description" [:div
:input-props {:default-value (:description state) [:& tokens.common/labeled-input {:label "Description"
#_#_:on-change #(on-update-description %)}}] :input-props {:default-value @description-ref
:on-change on-update-description}}]
(when @description-errors
[:p {:class (stl/css :error)}
(me/humanize @description-errors)])]
[:div {:class (stl/css :button-row)} [:div {:class (stl/css :button-row)}
[:button {:class (stl/css :button) [:button {:class (stl/css :button)
:type "submit" :type "submit"