ability to approve

src/cljs/auto_ap/views.cljs

@@ -85,8 +85,7 @@
         [:h1.title "All invoices"]])
      {:component-did-mount (fn []
                              (go
-                               (re-frame/dispatch [::events/received-invoices (:body (<! (http/get "/api/invoices")))]))
-                             )})])
+                               (re-frame/dispatch [::events/received-invoices (:body (<! (http/get "/api/invoices")))])))})])
 
 (defmethod active-page :import-invoices []
   [(with-meta
@@ -114,7 +113,16 @@
                       [:td customer-identifier]
                       [:td invoice-number]
                       [:td date]
-                      [:td total]])]]]]]))
+                      [:td total]])]]]
+            [:div.card-footer
+             [:a.card-footer-item
+              {:on-click (fn [e]
+                           (.preventDefault e)
+                           (re-frame/dispatch [::events/approve-invoices]))}
+              "Approve all"]
+             [:a.card-footer-item
+              "Reject all"]
+             ]]]))
       {:component-did-mount (fn []
                               (go
                                 (->> (<! (http/get "/api/invoices/pending"))