From 051280970f1423f15c912a4139ba044ee6bfda3c Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sat, 31 Aug 2019 07:48:27 -0700 Subject: [PATCH] moved to transducer, fixed export. --- src/clj/auto_ap/routes/exports.clj | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/clj/auto_ap/routes/exports.clj b/src/clj/auto_ap/routes/exports.clj index 08e92f02..b037e3cb 100644 --- a/src/clj/auto_ap/routes/exports.clj +++ b/src/clj/auto_ap/routes/exports.clj @@ -56,7 +56,12 @@ (map <-graphql (d-vendors/get-graphql {}))) (GET "/ledger/export" {:keys [query-params identity]} (assert-admin identity) - (map <-graphql (d-ledger/get-graphql {}))) + (transduce (comp + (map #(update % :journal-entry/date to-date)) + (map <-graphql)) + conj + (list) + (first (d-ledger/get-graphql {})))) (GET "/transactions/export" {:keys [query-params identity]} (assert-admin identity)