diff options
| author | Aaron Bedra and Stuart Halloway <pair@clojure.com> | 2010-07-23 13:22:37 -0400 |
|---|---|---|
| committer | Aaron Bedra and Stuart Halloway <pair@clojure.com> | 2010-07-23 13:22:37 -0400 |
| commit | 62078f31f425a0bf4be6508a51ac1fa8ce09ea51 (patch) | |
| tree | 0822526def4d1f54e2f8f4b523e0511f3f7c55bb | |
| parent | 13f960559f724521070d761639310d8b1f503216 (diff) | |
update strint to use clojure.core/slurp
| -rw-r--r-- | src/main/clojure/clojure/contrib/strint.clj | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/main/clojure/clojure/contrib/strint.clj b/src/main/clojure/clojure/contrib/strint.clj index 2333c5b1..53ddd639 100644 --- a/src/main/clojure/clojure/contrib/strint.clj +++ b/src/main/clojure/clojure/contrib/strint.clj @@ -15,8 +15,7 @@ (ns ^{:author "Chas Emerick", :doc "String interpolation for Clojure."} - clojure.contrib.strint - (:use [clojure.contrib.io :only (slurp*)])) + clojure.contrib.strint) (defn- silent-read "Attempts to clojure.core/read a single form from the provided String, returning @@ -26,7 +25,7 @@ [s] (try (let [r (-> s java.io.StringReader. java.io.PushbackReader.)] - [(read r) (slurp* r)]) + [(read r) (slurp r)]) (catch Exception e))) ; this indicates an invalid form -- the head of s is just string data (defn- interpolate |