Skip to content

Instantly share code, notes, and snippets.

@Xe Xe/server.clj Secret
Created Apr 21, 2014

Embed
What would you like to do?
(ns constellation.server
(:require [noir.server :as server] [necessary-evil.core :as xml-rpc] [constellation.atheme]))
(server/load-views-ns 'constellation.views)
(defn -main [& m]
(let [mode (keyword (or (first m) :dev))
port (Integer. (get (System/getenv) "PORT" "8080"))]
(server/start port {:mode mode
:ns 'constellation})))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.