diff options
| author | Stuart Sierra <mail@stuartsierra.com> | 2011-02-18 10:18:56 -0500 |
|---|---|---|
| committer | Stuart Halloway <stu@Stuart-Halloways-MacBook-Air.local> | 2011-02-25 14:27:50 -0500 |
| commit | e288fcc686f1bf81f15c656a956c5b06a44ac39e (patch) | |
| tree | b922e965b0515af8fc775e58501e15b9c78a83f1 | |
| parent | e91f855f098655a229b0de081b14f5be7c92651e (diff) | |
CLJ-739 Ensure version.properties is closed when loading core.clj
Signed-off-by: Stuart Halloway <stu@Stuart-Halloways-MacBook-Air.local>
| -rw-r--r-- | src/clj/clojure/core.clj | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 16186d47..713a889a 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -5918,10 +5918,11 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; clojure version number ;;;;;;;;;;;;;;;;;;;;;; -(let [version-stream (.getResourceAsStream - (clojure.lang.RT/baseLoader) - "clojure/version.properties") - properties (doto (new java.util.Properties) (.load version-stream)) +(let [properties (with-open [version-stream (.getResourceAsStream + (clojure.lang.RT/baseLoader) + "clojure/version.properties")] + (doto (new java.util.Properties) + (.load version-stream))) version-string (.getProperty properties "version") [_ major minor incremental qualifier snapshot] (re-matches |