aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/str_utils2.clj
diff options
context:
space:
mode:
authorStuart Sierra <mail@stuartsierra.com>2009-08-18 16:59:49 -0400
committerStuart Sierra <mail@stuartsierra.com>2009-08-18 16:59:49 -0400
commitc20fbee2d68fdcde18c7001f859d32513cf0bde6 (patch)
treeaef2b0e7343d32d01ce3adcbf5da8194a20478cc /src/clojure/contrib/str_utils2.clj
parent3b6d95140393bf78930c9f4045ba2feab36f3946 (diff)
str_utils2.clj: fix escape so it actually works, add tests
Diffstat (limited to 'src/clojure/contrib/str_utils2.clj')
-rw-r--r--src/clojure/contrib/str_utils2.clj2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/str_utils2.clj b/src/clojure/contrib/str_utils2.clj
index ec2741ce..26dd849f 100644
--- a/src/clojure/contrib/str_utils2.clj
+++ b/src/clojure/contrib/str_utils2.clj
@@ -93,7 +93,7 @@
[#^String s cmap]
(let [buffer (StringBuilder. (.length s))]
(dochars [c s]
- (if-let [r (cmap s)]
+ (if-let [r (cmap c)]
(.append buffer r)
(.append buffer c)))
(.toString buffer)))