blob: 82c6d4a59e83cf7b95f77f65e96a6d8ebba2adad (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
(ns pics.core
(:require [org.httpkit.server :as http-server]
[pics.routes :as proutes]
[dotenv :as env])
(:gen-class)
(:import java.io.File))
(defn -main [& args]
(let [img-folder (File. "./img/")]
(when-not (.exists img-folder)
(.mkdirs img-folder)))
(let [port (or (env/env "PORT") 8080)]
(println (str "Starting server on port " port "..."))
(http-server/run-server proutes/ring-handler {:port port})))
|
