This commit is contained in:
2022-12-07 22:11:14 -08:00
parent 520804cd8d
commit b2787b4732
2 changed files with 7 additions and 4 deletions

View File

@@ -256,8 +256,10 @@
(into [["Vendor Name" "Address" "City" "State" "Zip" "Terms" "Account" "Account Code"]]))]
{:body
(with-open [w (java.io.StringWriter.)]
(csv/write-csv w data)
(.toString w))})))
(csv/write-csv w data
:quote? (constantly true))
(.toString w))
:headers {"Content-Type" "application/csv"}})))
(GET "/ledger/export" {:keys [identity query-params]}
(let [start-date (or (some-> (query-params "start-date")
(atime/parse atime/iso-date))