Mercurial > laserkard

view 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
line wrap: on
line source
     1 (ns laserkard.common



     2     (:use (clojure.contrib prxml)))



     3 



     4 



     5 (defn pxml [ & args] 



     6   (with-out-str (apply prxml args)))



     7 



     8 (defn header []



     9    (pxml [:doctype! "html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\""]))



    10   



    11 



    12 



    13