comparison buy_temp.clj @ 79:343dc947f999 laserkard

read JavaSctipt: the good parts
author Robert McIntyre <rlm@mit.edu>
date Sun, 25 Jul 2010 01:33:22 -0400
parents 4ebd94bfecda
children 5b0753c6f34d
comparison
equal deleted inserted replaced
78:4ebd94bfecda 79:343dc947f999
1 (ns laserkard.buy-temp 1 (ns laserkard.buy-temp
2 2
3 (:use (compojure.http request servlet session routes) 3 (:use (compojure.http request servlet session routes)
4 (compojure.server jetty) 4 (compojure.server jetty)
5 (compojure control) 5 (compojure control)
6 (clojure.contrib prxml str-utils duck-streams) 6 (clojure.contrib def prxml str-utils duck-streams)
7 (laserkard common) 7 (laserkard common)
8 )) 8 ))
9 9
10 10
11 (defn buy-gen [] 11 (defn buy-gen []
12
13
14 (str 12 (str
15 (header) 13 (header)
16 (re-gsub 14 (re-gsub
17 #">" ">\n" 15 #">" ">\n"
18 (pxml 16 (pxml