aboutsummaryrefslogtreecommitdiff
path: root/modules/prxml/src/test/clojure
diff options
context:
space:
mode:
Diffstat (limited to 'modules/prxml/src/test/clojure')
-rw-r--r--modules/prxml/src/test/clojure/clojure/contrib/test_prxml.clj10
1 files changed, 10 insertions, 0 deletions
diff --git a/modules/prxml/src/test/clojure/clojure/contrib/test_prxml.clj b/modules/prxml/src/test/clojure/clojure/contrib/test_prxml.clj
new file mode 100644
index 00000000..53b2b388
--- /dev/null
+++ b/modules/prxml/src/test/clojure/clojure/contrib/test_prxml.clj
@@ -0,0 +1,10 @@
+(ns clojure.contrib.test-prxml
+ (:use clojure.test clojure.contrib.prxml))
+
+(deftest prxml-basic
+ (is (= "<p>Hello, World!</p>"
+ (with-out-str (prxml [:p "Hello, World!"])))))
+
+(deftest prxml-escaping
+ (is (= "<a href=\"foo&amp;bar\">foo&lt;bar</a>"
+ (with-out-str (prxml [:a {:href "foo&bar"} "foo<bar"])))))