rlm@69: (ns laserkard.server
rlm@70:   (:use (compojure.http request servlet session routes)
rlm@70: 	(compojure.server jetty)
rlm@71: 	(compojure control)
rlm@75: 	(laserkard buy-temp faq)
rlm@71: 
rlm@71: ))
rlm@69: 
rlm@69: (defroutes example
rlm@71:   (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>")
rlm@75:   (GET "/buy-temp.clj" [] (buy-gen))
rlm@75:   (GET "/faq.clj" [] (faq))
rlm@71: )
rlm@71: 
rlm@71: 
rlm@69: 
rlm@70: (defserver laserkard-server
rlm@70:   {:port 9000 :host "localhost"}
rlm@70:   "/*" (servlet example))
rlm@69: 
rlm@69: 
rlm@69: 
rlm@69: 
rlm@70: 
rlm@70: