Mercurial > rlm
view src/rlm/server_dice.clj @ 9:1065e7d615a4 tip
deactivate some cruft.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Mon, 08 Jul 2013 12:51:12 -0400 |
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"})))