Merge pull request #15 from Rende11/replace

Add default empty string arg and add capitalize func

Author: mlapshin

README.md

@@ -540,6 +540,8 @@ To be written.
 
 ### toUpperCase(s)
 
+### capitalize(s)
+
 ### range(begin, end, step)
 
 ### flatten(array)

spec/functions_spec.yml

@@ -22,6 +22,15 @@ tests:
     result:
       first: ["foo", "bar", "baz"]
 
+
+  - desc: splitStr
+    scope:
+      s: null
+    template:
+      first: $ splitStr(s, " +")
+    result:
+      first: [""]
+
   - desc: splitStr with limit = 0
 
     scope:
@@ -94,3 +103,63 @@ tests:
       a: "Hello JUTE mapping tool !"
       b: ""
       c: ""
+
+  - desc: toLowerCase
+    scope:
+      a: "HELLO"
+      b: ""
+      c: null
+      d: "Test"
+
+    template:
+      a: $ toLowerCase(a)
+      b: $ toLowerCase(b)
+      c: $ toLowerCase(c)
+      d: $ toLowerCase(d)
+
+    result:
+      a: "hello"
+      b: ""
+      c: ""
+      d: "test"
+
+  - desc: toUpperCase
+    scope:
+      a: "HELLO"
+      b: ""
+      c: null
+      d: "Test"
+
+    template:
+      a: $ toUpperCase(a)
+      b: $ toUpperCase(b)
+      c: $ toUpperCase(c)
+      d: $ toUpperCase(d)
+
+    result:
+      a: "HELLO"
+      b: ""
+      c: ""
+      d: "TEST"
+
+  - desc: capitalize
+    scope:
+      a: "HELLO"
+      b: ""
+      c: null
+      d: "Test"
+      e: "one"
+
+    template:
+      a: $ capitalize(a)
+      b: $ capitalize(b)
+      c: $ capitalize(c)
+      d: $ capitalize(d)
+      e: $ capitalize(e)
+
+    result:
+      a: "Hello"
+      b: ""
+      c: ""
+      d: "Test"
+      e: "One"

src/jute/core.cljc

@@ -110,7 +110,7 @@
 (def standard-fns
   {:join str/join       ;; deprecated
    :joinStr str/join
-   :splitStr (fn [s re & [limit]] (str/split s (re-pattern re) (or limit 0)))
+   :splitStr (fn [s re & [limit]] (str/split (or s "") (re-pattern re) (or limit 0)))
    :substring subs      ;; deprecated
    :substr    subs
    :replace (fn [s re to]
@@ -126,8 +126,9 @@
    :range range
    :randNth rand-nth
    :toString to-string
-   :toLowerCase str/lower-case
-   :toUpperCase str/upper-case
+   :toLowerCase #(str/lower-case (or % ""))
+   :toUpperCase #(str/upper-case (or % ""))
+   :capitalize #(str/capitalize (or % ""))
    :toKeyword keyword
    :hash hash
    :toInt (fn [v] (if (string? v)