final.
This commit is contained in:
@@ -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))
|
||||
|
||||
Reference in New Issue
Block a user