diff options
| author | Chouser <chouser@n01se.net> | 2009-01-08 04:03:56 +0000 |
|---|---|---|
| committer | Chouser <chouser@n01se.net> | 2009-01-08 04:03:56 +0000 |
| commit | 6d383e77477db3bd3005f0820c05fb5b52fd30a7 (patch) | |
| tree | c234b64ba3235749bb55a2ad3ad235c1ed47ca48 /src | |
| parent | ad8c9f8bf837294497562985573f0512d3571ee7 (diff) | |
Fix for repl-utils after Clojure SVN 1201 broke it.
Diffstat (limited to 'src')
| -rw-r--r-- | src/clojure/contrib/repl_utils.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/repl_utils.clj b/src/clojure/contrib/repl_utils.clj index ba045565..86ea80b5 100644 --- a/src/clojure/contrib/repl_utils.clj +++ b/src/clojure/contrib/repl_utils.clj @@ -66,7 +66,7 @@ (let [ns-name (str (.name (.ns v))) path (first (re-seq #"^.*(?=/[^/]*$)" (.replace ns-name "." "/"))) fname (str path "/" (:file ^v))] - (when-let [strm (.getResourceAsStream RT/ROOT_CLASSLOADER fname)] + (when-let [strm (.getResourceAsStream (RT/baseLoader) fname)] (with-open [rdr (LineNumberReader. (InputStreamReader. strm))] (dotimes [_ (dec (:line ^v))] (.readLine rdr)) (let [text (StringBuilder.) |