all kinds of linkability.

This commit is contained in:
2021-01-26 12:37:40 -08:00
parent 7eeb1737ab
commit 74936001ba
5 changed files with 67 additions and 29 deletions

View File

@@ -135,16 +135,19 @@
(re-frame/reg-event-fx
::set-active-page
(fn [{:keys [db]} [_ handler params]]
(if (and (not= :login handler) (not (:user db)))
{:redirect "/login"
:db (assoc db :active-page :login
:page-failure nil
:auto-ap.forms/forms nil)}
{:db (assoc db :active-page handler
:page-failure nil
:query-params params
:auto-ap.forms/forms nil)})))
{:db (-> db
(assoc :active-page handler
:page-failure nil
:query-params params
:auto-ap.forms/forms nil)
(auto-ap.views.pages.data-page/dispose-all))})))
(re-frame/reg-event-db
::imported-invoices