fix import batch

This commit is contained in:
2022-10-10 20:48:37 -07:00
parent 70391b6b56
commit 68721520e6
2 changed files with 3 additions and 6 deletions

View File

@@ -199,6 +199,7 @@
(try
(f entry)
(catch Exception e
(println e)
(assoc entry :error (.getMessage e)
:status (or (:status (ex-data e))
:error))))))

View File

@@ -45,19 +45,15 @@
::unmounted
(fn [{:keys [db]}]
{:dispatch [::data-page/dispose ::page]
::track/dispose {:id ::params}
:db (dissoc db ::msg)}))
::track/dispose {:id ::params}}))
;; VIEWS
(def import-batch-content
(with-meta
(fn []
(let [user @(re-frame/subscribe [::subs/user])
message @(re-frame/subscribe [::msg])]
(let [user @(re-frame/subscribe [::subs/user])]
[:div
[:h1.title "Import Batches"]
(when message
[:div.notification.is-info.is-light message])
(when (= "admin" (:user/role user))
[:div
[:div.is-pulled-right