Mercurial > laserkard
annotate server.clj @ 74:24d5d4221b42 laserkard
session with nick, updated the about page
author | r@rlm |
---|---|
date | Fri, 25 Jun 2010 19:59:31 -0400 |
parents | ad52bd1a084b |
children | 874a6a2c28cf |
rev | line source |
---|---|
rlm@69 | 1 (ns laserkard.server |
rlm@70 | 2 (:use (compojure.http request servlet session routes) |
rlm@70 | 3 (compojure.server jetty) |
rlm@71 | 4 (compojure control) |
rlm@71 | 5 (laserkard buy-temp) |
rlm@71 | 6 |
rlm@71 | 7 )) |
rlm@69 | 8 |
rlm@69 | 9 (defroutes example |
rlm@71 | 10 (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>") |
rlm@71 | 11 (GET "/buy-temp.clj" [] (buy-gen)) |
rlm@71 | 12 ) |
rlm@71 | 13 |
rlm@71 | 14 |
rlm@69 | 15 |
rlm@70 | 16 (defserver laserkard-server |
rlm@70 | 17 {:port 9000 :host "localhost"} |
rlm@70 | 18 "/*" (servlet example)) |
rlm@69 | 19 |
rlm@69 | 20 |
rlm@69 | 21 |
rlm@69 | 22 |
rlm@70 | 23 |
rlm@70 | 24 |