blob: 12c2c0286f85b842b3789651dfc7bee21f4b963c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
(ns chameleon.server
(:require [chameleon.config :refer [config]]
[chameleon.handler :refer [handler]]
[config.core :refer [env]]
[org.httpkit.server :refer [run-server]]
[integrant.core :as ig]
[chameleon.specs :as cs])
(:gen-class))
(defn -main [& args]
(let [port (Integer/parseInt (or (env :http-port) "8082"))
system-config (read-string (slurp (System/getenv "CONFIG_LOCATION" )))
event-config (:event-config system-config)
route-config (:gallifrey-host system-config)
log-config (:log-config system-config)]
(println "Listening on port" port)
(ig/init (config {:event-config event-config
:gallifrey-host route-config
:http-port port
:log-config log-config}))))
|