(cloud) Made invoice proposition a usable ion

src/clj/auto_ap/jobs/ntg.clj

@@ -3,6 +3,7 @@
    [amazonica.aws.s3 :as s3]
    [auto-ap.datomic.clients :as d-clients]
    [auto-ap.jobs.core :refer [execute]]
+   [iol-ion.tx :refer [propose-invoice]]
    [auto-ap.logging :as log]
    [auto-ap.parse :as parse]
    [auto-ap.time :as atime]
@@ -83,7 +84,7 @@
                                                           :destination-key         invoice-key})
                                          (->> (extract-invoice-details (read-csv k) clients)
                                              (map (fn [i]
-                                                    [:propose-invoice (assoc i :invoice/source-url invoice-url)]))
+                                                    [`(propose-invoice ~(assoc i :invoice/source-url invoice-url))]))
                                              ))
                                        (catch Exception e
                                          (log/error ::cant-load-file