Mercurial > rlm
view src/rlm/server_dice.clj @ 5:fca75c0e8f40
added stories.clj
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 01 Mar 2012 05:47:37 -0700 |
parents | 78a630e650d2 |
children |
line wrap: on
line source
1 (ns laserkard.server2 (:use3 [compojure core]4 [ring.adapter jetty]5 [laserkard buy-temp faq])6 )8 (defroutes laserkard9 (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>")10 (GET "/buy-temp.clj" [] (buy-gen))11 (GET "/faq.clj" [] (faq))12 )14 (defn serve []15 (future16 (run-jetty (var laserkard.server/laserkard) {:port 9000 :host "localhost"})))