2021-03-06 21:55:41 +01:00

14 lines
343 B
Clojure

(ns chicken-master.server
(:require [chicken-master.handler :refer [handler]]
[config.core :refer [env]]
[ring.adapter.jetty :refer [run-jetty]])
(:gen-class))
(defn -main [& _args]
(let [port (or (env :port) 3000)]
(run-jetty handler {:port port :join? false})))
(comment
(def h (-main))
(.stop h))