Mercurial > laserkard

view server.clj @ 70:751fb9fd445b laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
finally got a lisp server yay
author Robert McIntyre <rlm@mit.edu>
date Tue, 22 Jun 2010 20:15:19 -0400
parents dd97a10c782e
children ad52bd1a084b
line wrap: on
line source
     1 (ns laserkard.server



     2   (:use (compojure.http request servlet session routes)



     3 	(compojure.server jetty)



     4 	(compojure control)))



     5 



     6 (defroutes example



     7   (GET "/index.clj" [] "<h1> hello, connie, good to meet you</h1>"))



     8 



     9 (defserver laserkard-server



    10   {:port 9000 :host "localhost"}



    11   "/*" (servlet example))



    12 



    13 



    14 



    15 



    16 



    17