Mercurial > laserkard

annotate common.clj @ 106:5b0753c6f34d laserkard tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated to newest compojure and a simpler syntax
author Robert McIntyre <rlm@mit.edu>
date Mon, 27 Sep 2010 20:22:58 -0400
parents 874a6a2c28cf
children
rev   line source
rlm@75 1 (ns laserkard.common
rlm@106 2 (:use (clojure.contrib prxml)))
rlm@75 3
rlm@75 4
rlm@75 5 (defn pxml [ & args]
rlm@75 6 (with-out-str (apply prxml args)))
rlm@75 7
rlm@75 8 (defn header []
rlm@75 9 (pxml [:doctype! "html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\""]))
rlm@75 10
rlm@75 11
rlm@75 12
rlm@75 13