Skip to content

Instantly share code, notes, and snippets.

@mingder78

mingder78/gist:4976699

Created February 18, 2013 11:19
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save mingder78/4976699 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save mingder78/4976699 to your computer and use it in GitHub Desktop.
Download ZIP
(:gen-class)
Raw
gistfile1.txt
$ ls
models server.clj views
Ming-Mac-mini:noir_mongodb ming$ cat *clj
(ns noir-mongodb.server
(:gen-class)
(:require [noir.server :as server]))
(server/load-views-ns 'noir-mongodb.views)
(defn -main [& m]
(let [mode (keyword (or (first m) :dev))
port (Integer. (get (System/getenv) "PORT" "9000"))]
(server/start port {:mode mode
:ns 'noir-mongodb})))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment