simple change to get accounts auto-populating.

This commit is contained in:
Bryce Covert
2019-04-17 11:13:19 -07:00
parent c51d235a36
commit d30b0948d4
4 changed files with 39 additions and 17 deletions

View File

@@ -87,7 +87,7 @@
keys (assoc keys
:on-change (dispatch-value-change (conj event field))
:value (get-in subscription field)
:value (or (get-in subscription field) "")
:class (str class
(when (and spec (not (s/valid? spec (get-in subscription field))))
" is-danger")))
@@ -95,7 +95,7 @@
options (if allow-nil?
(with-keys (conj rest [:option {:value nil}]))
(with-keys rest))]
(into [dom keys] options)))
(into [dom (dissoc keys :allow-nil?)] options)))
(defmethod do-bind "radio" [dom {:keys [field subscription event class value spec] :as keys} & rest]