added lowercase and test

sunng87 · Mar 7, 2013 · 29051c8 · 29051c8
1 parent 85f433c
commit 29051c8
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/src/hbs/ext.clj b/src/hbs/ext.clj
@@ -32,3 +32,6 @@
 
 (defhelper uppercase [^Object ctx ^Options options]
   (clojure.string/upper-case ctx))
+
+(defhelper lowercase [^Object ctx ^Options options]
+  (clojure.string/lower-case ctx))
diff --git a/test/hbs/ext_test.clj b/test/hbs/ext_test.clj
@@ -25,3 +25,7 @@
 (deftest test-uppercase
   (let [tpl "{{uppercase tom.cat}}"]
     (is (= "HELLO" (render tpl {:tom {:cat "hello"}})))))
+
+(deftest test-lowercase
+  (let [tpl "{{lowercase tom.cat}}"]
+    (is (= "hello" (render tpl {:tom {:cat "HELLO"}})))))