allowing saving after saving.

This commit is contained in:
BC
2018-10-25 19:11:26 -07:00
parent 2401c5c227
commit d1db270f4e
2 changed files with 10 additions and 10 deletions

View File

@@ -11,6 +11,7 @@
[auto-ap.subs :as subs]))
(defn vendor-dialog [{:keys [vendor save-event change-event id] {:keys [name]} :vendor}]
(let [companies-by-id @(re-frame/subscribe [::subs/companies-by-id])]
[action-modal {:id id
:title [:span (if (:id vendor)
@@ -23,7 +24,7 @@
:save-event save-event
:can-submit? (s/valid? ::entity/vendor vendor)}
(doto (s/explain ::entity/vendor vendor) println)
[horizontal-field
[:label.label "Name"]