(ns dummy-auth.core (:require [org.httpkit.server :as http-server] [dummy-auth.config :as dconfig] [dummy-auth.routes :as droutes]) (:gen-class)) (defn -main [& args] (let [config (dconfig/read-config (or (first args) "./config.json")) port (:port config)] (println (str "Starting http server on port " port "...")) (http-server/run-server droutes/ring-handler {:port port})))