Mercurial > laserkard
comparison common.clj @ 75:874a6a2c28cf laserkard
session with nick. redisigned faq page
| author | Robert McIntyre <rlm@mit.edu> |
|---|---|
| date | Tue, 29 Jun 2010 15:36:30 -0400 |
| parents | |
| children | 5b0753c6f34d |
comparison
equal
deleted
inserted
replaced
| 74:24d5d4221b42 | 75:874a6a2c28cf |
|---|---|
| 1 (ns laserkard.common | |
| 2 (:use (compojure.http request servlet session routes) | |
| 3 (compojure.server jetty) | |
| 4 (compojure control) | |
| 5 (clojure.contrib prxml str-utils duck-streams))) | |
| 6 | |
| 7 | |
| 8 (defn pxml [ & args] | |
| 9 (with-out-str (apply prxml args))) | |
| 10 | |
| 11 (defn header [] | |
| 12 (pxml [:doctype! "html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\""])) | |
| 13 | |
| 14 | |
| 15 | |
| 16 |