Skip to content

Instantly share code, notes, and snippets.

@jwthomp

jwthomp/gist:2400439

Created April 16, 2012 18:11
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 jwthomp/2400439 to your computer and use it in GitHub Desktop.
Save jwthomp/2400439 to your computer and use it in GitHub Desktop.
Download ZIP
simple noir server
Raw
gistfile1.clj
(ns dungeonverse.core
(:use noir.core)
(:require [noir.server :as server]))
(def the-server (atom nil))
(defpage "/welcome" []
"Welcome to Noir!")
(defn start [] (reset! the-server (server/start 8080 [:base-url "stf.gameoire.com"])))
(defn stop [] (server/stop @the-server) (reset! the-server nil))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment