notid/integreat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

You can now add clients manually.

Browse Source
This commit is contained in:
BC
2019-02-12 11:16:01 -08:00
parent 5fa181465c
commit b85ba810b3
3 changed files with 22 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/cljs/auto_ap/views/pages/admin/clients.cljs
View File

@@ -75,12 +75,16 @@
(re-frame/reg-event-fx
::save-complete
(fn [{:keys [db]} [_ client]]
(println client)
{:dispatch [::events/modal-completed :auto-ap.views.pages.admin.clients/edit]
:db (-> db
(assoc-in [:admin :client] nil)
(assoc-in [:clients (:id (:edit-client client))] (:edit-client client)))}))
(assoc-in [:admin :adding-client?] false)
(update :admin dissoc :new-client)
(assoc-in [:admin :client] nil)
(assoc-in [:clients (:id (:edit-client client))] (:edit-client client)))}))
(re-frame/reg-event-db
::save-error
@@ -516,7 +520,7 @@
:on-click (dispatch-event [::save-new-client])} "Save"]]]))
(defn admin-clients-page []
(let [adding-client? @(re-frame/subscribe [::subs/admin])]
(let [{:keys [adding-client?]} @(re-frame/subscribe [::subs/admin])]
[side-bar-layout {:side-bar [admin-side-bar {}]
:main [admin-clients-content]
:right-side-bar (when adding-client?