moved to integreat

This commit is contained in:
Bryce Covert
2018-04-10 06:43:44 -07:00
parent 5e7add409f
commit 39fa8a8032
18 changed files with 50 additions and 70 deletions

View File

@@ -1,5 +1,6 @@
(ns auto-ap.db.companies
(:require [auto-ap.db.utils :refer [clj->db db->clj get-conn assign-namespace]]
(:require [auto-ap.db.utils :refer [assign-namespace clj->db db->clj
get-conn]]
[auto-ap.entities.companies :as entity]
[clojure.edn :as edn]
[clojure.java.jdbc :as j]))

View File

@@ -33,7 +33,7 @@
(insert-multi!
(for [{:keys [total date invoice-number customer-identifier vendor] :as row} parsed-invoices]
(do
(println row)
(assoc row
:company-id (::company/id (parse/best-match companies customer-identifier))
:imported false

View File

@@ -1,5 +1,6 @@
(ns auto-ap.db.vendors
(:require [auto-ap.db.utils :refer [clj->db db->clj get-conn assign-namespace]]
(:require [auto-ap.db.utils :refer [assign-namespace clj->db db->clj
get-conn]]
[auto-ap.entities.vendors :as entities]
[clojure.edn :as edn]
[clojure.java.jdbc :as j]))

View File

@@ -2,7 +2,6 @@
(:require [auto-ap.db.companies :as companies]
[auto-ap.routes.utils :refer [wrap-secure wrap-spec]]
[auto-ap.entities.companies :as entity]
[clojure.spec.alpha :as s]
[compojure.core :refer [GET PUT context defroutes
wrap-routes]]))

View File

@@ -3,6 +3,7 @@
[auto-ap.db.reminders :as reminders]
[auto-ap.db.vendors :as vendors]
[auto-ap.routes.utils :refer [wrap-secure]]
[config.core :refer [env]]
[clj-http.client :as http]
[clj-time.coerce :as c]
[clj-time.core :as time]
@@ -42,7 +43,7 @@
(doseq [{:keys [vendor-name email id]} reminders]
(println "Sending email to" email)
(ses/send-email :destination {:to-addresses [email]}
:source "invoices@mail.integreat.aws.brycecovertoperations.com"
:source (:invoice-email env)
:message {:subject "Reminder to send invoices"
:body {:html (str "<h1>Hello " vendor-name ",</h1><p>This is a reminder to send this week's invoices to us. You can just reply to this email.</p> <p> - Integreat. </p>")
:text (str "Hello " vendor-name ",\r\nThis is a reminder to send this week's invoices to us. You can just reply to this email.\r\n - Integreat.")}})

View File

@@ -1,6 +1,6 @@
(ns auto-ap.routes.utils
(:require [clojure.spec.alpha :as s]
[buddy.auth :refer [authenticated?]]))
(:require [buddy.auth :refer [authenticated?]]
[clojure.spec.alpha :as s]))
(defn wrap-secure [handler]
(fn [request]

View File

@@ -1,8 +1,7 @@
(ns auto-ap.routes.vendors
(:require [auto-ap.db.vendors :as vendors]
[auto-ap.routes.utils :refer [wrap-secure wrap-spec]]
[auto-ap.entities.vendors :as entity]
[clojure.spec.alpha :as s]
[auto-ap.routes.utils :refer [wrap-secure wrap-spec]]
[compojure.core :refer [GET POST PUT context defroutes
wrap-routes]]))