blob: cefa6b500654b3403dfd18f8267a9dec3209e292 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(ns gallifrey.server
(:require [gallifrey.config :refer [config]]
[gallifrey.handler :refer [handler]]
[config.core :refer [env]]
[org.httpkit.server :refer [run-server]]
[integrant.core :as ig])
(:gen-class))
(defn -main [& args]
(let [port (Integer/parseInt (or (env :http-port) "8081"))]
(println "Listening on port" port)
(ig/init (config {:db-server {:host (or (env :db-host) "rethinkdb")
:port 28015}
:http-port port}))))
|