Skip to content

Instantly share code, notes, and snippets.

@Xe

Xe/server.clj Secret

Created April 21, 2014 23:33
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Xe/2309529ee383916f2e7b to your computer and use it in GitHub Desktop.
Save Xe/2309529ee383916f2e7b to your computer and use it in GitHub Desktop.
Download ZIP
Raw
server.clj
(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