diff options
author | Morgan <m@morganastra.me> | 2015-03-03 08:46:57 +0000 |
---|---|---|
committer | Morgan <m@morganastra.me> | 2015-03-03 08:46:57 +0000 |
commit | ca78ad1860a9d9610883cb3b66d239232d21b0dd (patch) | |
tree | 32a149a32c7b791fcfd8698590fe26a327a5cabc /src | |
parent | 745314c13d48063c47bb4f8887ca099b976e01b8 (diff) |
listen on the right pordt
Diffstat (limited to 'src')
-rw-r--r-- | src/pronouns/web.clj | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/pronouns/web.clj b/src/pronouns/web.clj index 849465a..1a0ff63 100644 --- a/src/pronouns/web.clj +++ b/src/pronouns/web.clj @@ -10,7 +10,7 @@ [ring.adapter.jetty :as jetty] [environ.core :refer [env]])) -(def config {:server-port 5000}) +(def config {:default-server-port 5000}) (defroutes app-routes (GET "/" [] @@ -30,12 +30,14 @@ (def app (-> app-routes - ; logger/wrap-with-logger + logger/wrap-with-logger wrap-error-page trace/wrap-stacktrace)) (defn -main [] - (jetty/run-jetty app {:port (:server-port config)})) + (let [port (or (Integer. (env :port)) + (:default-server-port config))]) + (jetty/run-jetty app {:port port})) ;; For interactive development: ;; (.stop server) |