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

Fix naming to avoid breaking change

Browse source
This commit is contained in:
bom 2023-10-27 12:37:24 +02:00
parent 0da8216e6c
commit 52d5263b86
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -21,7 +21,7 @@
(s/def ::deserializer fn?) (s/def ::deserializer fn?)
(s/def ::optional boolean?) (s/def ::optional boolean?)
(def dom-function-parameter (s/keys :opt-un [::deserializer ::optional])) (def dom-function-parameter (s/keys :opt-un [::deserializer ::optional]))
(defn-spec get-content-from-element js-object? (defn-spec get-content-value-from-element js-object?
[name string?] [name string?]
(-> (get-element-by-id name) (-> (get-element-by-id name)
(.-value))) (.-value)))
@ -36,11 +36,11 @@
:else :else
(apply deserializer [content]))) (apply deserializer [content])))
(defn-spec get-deserialized-content js-object? (defn-spec get-content-from-element js-object?
[name string? [name string?
& {:keys [deserializer optional] & {:keys [deserializer optional]
:or {deserializer identity optional false}} dom-function-parameter] :or {deserializer identity optional false}} dom-function-parameter]
(-> (get-content-from-element name) (-> (get-content-value-from-element name)
(deserialize-content deserializer optional))) (deserialize-content deserializer optional)))
(defn-spec set-validation-result! js-object? (defn-spec set-validation-result! js-object?

2
src/test/cljs/dda/c4k_common/browser_test.cljs
View file

@ -8,7 +8,7 @@
(st/instrument `cut/get-element-by-id) (st/instrument `cut/get-element-by-id)
(st/instrument `cut/get-content-from-element) (st/instrument `cut/get-content-from-element)
(st/instrument `cut/deserialize-content) (st/instrument `cut/deserialize-content)
(st/instrument `cut/get-deserialized-content) (st/instrument `cut/get-content-value-from-element)
(st/instrument `cut/set-validation-result!) (st/instrument `cut/set-validation-result!)
(st/instrument `cut/validate!) (st/instrument `cut/validate!)
(st/instrument `cut/set-output!) (st/instrument `cut/set-output!)