include :version-string in nREPL version map

clojure · Nov 13, 2012 · 0b8b06b · 0b8b06b
1 parent ac95dc7
commit 0b8b06b
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/src/main/clojure/clojure/tools/nrepl.clj b/src/main/clojure/clojure/tools/nrepl.clj
@@ -227,7 +227,9 @@
       version
   (when-let [in (.getResourceAsStream (class connect) "/clojure/tools/nrepl/version.txt")]
     (with-open [^java.io.BufferedReader reader (io/reader in)]
-      (->> (.readLine reader)
-        (re-find #"(\d+)\.(\d+)\.(\d+)-?(.*)")
-        rest
-        (zipmap [:major :minor :incremental :qualifier])))))
+      (let [version-string (-> reader .readLine .trim)]
+        (assoc (->> version-string 
+                 (re-find #"(\d+)\.(\d+)\.(\d+)-?(.*)")
+                 rest
+                 (zipmap [:major :minor :incremental :qualifier]))
+               :version-string version-string)))))