View difference between Paste ID: QpSA5EXy and
SHOW:
|
|
- or go back to the newest paste.
| 1 | - | |
| 1 | + | (ns http.handler |
| 2 | (:require | |
| 3 | [ring.adapter.jetty :as jetty] | |
| 4 | [compojure.handler :as handler] )) | |
| 5 | ||
| 6 | … | |
| 7 | ||
| 8 | (def app | |
| 9 | (handler/site main)) | |
| 10 | ||
| 11 | (defn -main [] | |
| 12 | (let [port (Integer/parseInt (System/getenv "PORT"))] | |
| 13 | (jetty/run-jetty app {:port port})
| |
| 14 | )) |
