can set up multiple locations

2018-06-15 12:32:40 -07:00
parent f9c0e55b01
commit b06a6651ca
7 changed files with 88 additions and 55 deletions
--- a/src/clj/auto_ap/db/companies.clj
+++ b/src/clj/auto_ap/db/companies.clj
@@ -19,7 +19,9 @@
  (-> x
      (assoc-in [:data :bank-accounts] (:bank-accounts x))
      (assoc-in [:data :address] (:address x))
+      (assoc-in [:data :locations] (:locations x))
      (dissoc :bank-accounts)
+      (dissoc :locations)
      (dissoc :address)))

 (defn get-all []