Skip to content

Commit

Permalink
update strint to use clojure.core/slurp
Browse files Browse the repository at this point in the history
  • Loading branch information
Aaron Bedra and Stuart Halloway committed Jul 23, 2010
1 parent 4715ee3 commit c2645e3
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions src/main/clojure/clojure/contrib/strint.clj
Expand Up @@ -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
Expand All @@ -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
Expand Down

0 comments on commit c2645e3

Please sign in to comment.