Mercurial > laserkard

comparison server.clj @ 75:874a6a2c28cf laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
session with nick. redisigned faq page
author Robert McIntyre <rlm@mit.edu>
date Tue, 29 Jun 2010 15:36:30 -0400
parents ad52bd1a084b
children 5b0753c6f34d
comparison
equal deleted inserted replaced
74:24d5d4221b42 75:874a6a2c28cf
1 (ns laserkard.server 1 (ns laserkard.server
2 (:use (compojure.http request servlet session routes) 2 (:use (compojure.http request servlet session routes)
3 (compojure.server jetty) 3 (compojure.server jetty)
4 (compojure control) 4 (compojure control)
5 (laserkard buy-temp) 5 (laserkard buy-temp faq)
6 6
7 )) 7 ))
8 8
9 (defroutes example 9 (defroutes example
10 (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>") 10 (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>")
11 (GET "/buy-temp.clj" [] (buy-gen)) 11 (GET "/buy-temp.clj" [] (buy-gen))
12 (GET "/faq.clj" [] (faq))
12 ) 13 )
13 14
14 15
15 16
16 (defserver laserkard-server 17 (defserver laserkard-server