Mercurial > laserkard
comparison server.clj @ 69:dd97a10c782e laserkard
Added access.log and error.log to switch to lighttpd.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 22 Jun 2010 13:37:30 -0400 |
parents | |
children | 751fb9fd445b |
comparison
equal
deleted
inserted
replaced
68:098a3d3ccc4c | 69:dd97a10c782e |
---|---|
1 (ns laserkard.server | |
2 (:use compojure.core | |
3 ring.adapter.jetty) | |
4 (:require [compojure.route :as route])) | |
5 | |
6 (defroutes example | |
7 (GET "/index.clj" [] "<h1>Hello World Wide Web!</h1>") | |
8 (route/not-found "Page not found")) | |
9 | |
10 (defn serve [] | |
11 (run-jetty example {:port 9000})) | |
12 | |
13 | |
14 | |
15 |