Mercurial > laserkard

comparison temp342423/server.clj @ 102:8ed3394e6b73 laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
wrote comment-killer
author Robert McIntyre <rlm@mit.edu>
date Tue, 27 Jul 2010 22:23:13 -0400
parents
children
comparison
equal deleted inserted replaced
101:2bec541ef58f 102:8ed3394e6b73
1 (ns laserkard.server
2 (:use (compojure.http request servlet session routes)
3 (compojure.server jetty)
4 (compojure control)
5 (laserkard buy-temp faq)
6
7 ))
8
9 (defroutes example
10 (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>")
11 (GET "/buy-temp.clj" [] (buy-gen))
12 (GET "/faq.clj" [] (faq))
13 )
14
15
16
17 (defserver laserkard-server
18 {:port 9000 :host "localhost"}
19 "/*" (servlet example))
20
21
22 ;adasdas
23
24 ;asdas
25
26
27