handler.clj

(ns _.handler
  (:require [ring.adapter.jetty :refer [run-jetty])
  (:gen-class)

;; ... Routes and stuff ...

(def app
  (handler/site app-routes))

;; Server

(defn start-server [port]
  (run-jetty app {:port port}))

(defn -main [& args]
  (let [port (Integer. (or (first args) "5002"))]
    (start-server port)))