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

fixing kick.

Browse Source
This commit is contained in:
BC
2018-10-25 21:18:31 -07:00
parent 690228ee94
commit 5a0bcc7ca4
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/cljs/auto_ap/views/pages/admin/yodlee.cljs
View File

@@ -72,11 +72,18 @@
(re-frame/reg-event-fx (re-frame/reg-event-fx
::kick ::kick
(fn [{:keys [db]} [_ id]] (fn [{:keys [db]} [_ id]]
{:http {:token (:user db) {:db (update-in db [::yodlee :accounts]
(fn [as]
(map (fn [a]
(if (= (:id a) id)
(assoc a :status :kicking)
a))
as)))
:http {:token (:user db)
:method :post :method :post
:headers {"Content-Type" "application/edn"} :headers {"Content-Type" "application/edn"}
:uri (str "/api/yodlee/accounts/" id) :uri (str "/api/yodlee/accounts/" id)
:on-success [::kicked id :kicking] :on-success [::kicked id :kicked]
:on-error [::kicked id :errored]}})) :on-error [::kicked id :errored]}}))
(re-frame/reg-event-fx (re-frame/reg-event-fx
@@ -138,7 +145,7 @@
[:tr [:td {:col-span "6"} "Loading..."] [:tr [:td {:col-span "6"} "Loading..."]
] ]
(for [account @(re-frame/subscribe [::accounts])] (for [account @(re-frame/subscribe [::accounts])]
[:tr ^{:key (:id account)} [:tr
[:td (:accountName account)] [:td (:accountName account)]
[:td (:accountNumber account)] [:td (:accountNumber account)]
[:td (:id account)] [:td (:id account)]
@@ -148,8 +155,11 @@
(cond (= (:status account) :kicking) (cond (= (:status account) :kicking)
[:button.button.is-success.is-loading {:disabled "disabled"} "Kick."] [:button.button.is-success.is-loading {:disabled "disabled"} "Kick."]
(= (:status account) :kicked)
[:button.button.is-success {:disabled "disabled"} "..."]
(= (:status account) :error) (= (:status account) :error)
[:button.button.is-error.is-loading {:disabled "disabled"} "Error."] [:button.button.is-error {:disabled "disabled"} "Error."]
:else :else
[:button.button.is-success {:on-click (dispatch-event [::kick (:id account)] )} "Kick." ])]]))]]) [:button.button.is-success {:on-click (dispatch-event [::kick (:id account)] )} "Kick." ])]]))]])