meissa/c4k-common
6
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix get-content-from-element

Browse source
This commit is contained in:
bom 2023-10-06 11:56:20 +02:00
parent 8189206ec6
commit 966ecf1009
1 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/main/cljs/dda/c4k_common/browser.cljs
View file

@ -36,6 +36,20 @@
:else
content)))
(defn-spec get-content-from-element-2 js-object?
[name string?
& {:keys [deserializer optional]
:or {deserializer nil optional false}} dom-function-parameter]
(let [content (-> (get-element-by-id name)
(.-value))]
(cond
(and optional (st/blank? content))
nil
(some? deserializer)
(apply deserializer [content])
:else
content)))
(defn-spec set-validation-result! js-object?
[name string?
validation-result js-object?]