Close to supporting bulk upload

This commit is contained in:
2022-09-30 16:58:17 -07:00
parent ae1500be9a
commit 556d6311ff
2 changed files with 42 additions and 13 deletions

View File

@@ -255,11 +255,12 @@
Consumer
["status" "can-submit" "fullwidth?"]
(fn [status can-submit fullwidth?]
[:button.button.is-medium.is-primary {:disabled (or (status/disabled-for status)
(not can-submit))
:class (cond-> (or class [])
(status/class-for status) (into (status/class-for status))
fullwidth? (conj "is-fullwidth")) }
[:button.button.is-primary {:disabled (or (status/disabled-for status)
(not can-submit))
:class (cond-> (or class [])
(status/class-for status) (into (status/class-for status))
fullwidth? (conj "is-fullwidth")
(not= "is-small" class) (conj "is-medium")) }
child]))))
(defn hidden-submit-button []