expense account logic

This commit is contained in:
Bryce Covert
2019-04-12 20:58:11 -07:00
parent 9be0c02347
commit 53c80e13ee
2 changed files with 12 additions and 7 deletions

View File

@@ -7,7 +7,8 @@
(:import [org.apache.commons.io.input BOMInputStream]))
(defn add-new-vendors [conn]
(let [[header & rows] (-> "vendor-list.csv" (io/resource) io/input-stream (BOMInputStream.) (io/reader) csv/read-csv)
[[]]
#_(let [[header & rows] (-> "vendor-list.csv" (io/resource) io/input-stream (BOMInputStream.) (io/reader) csv/read-csv)
headers (map read-string header)
new-vendors [(reduce
(fn [rows r]