read stdout and stderr in parallel (using futures)

Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>

1 files changed, 3 insertions, 3 deletions

diff --git a/src/clj/clojure/java/shell.clj b/src/clj/clojure/java/shell.clj
index 72f0311b..fa553671 100644
--- a/src/clj/clojure/java/shell.clj
+++ b/src/clj/clojure/java/shell.clj
@@ -124,10 +124,10 @@ collecting its stdout"}
       (.close (.getOutputStream proc)))
     (with-open [stdout (.getInputStream proc)
                 stderr (.getErrorStream proc)]
-      (let [out (stream-to-enc stdout out-enc)
-            err (stream-to-string stderr)
+      (let [out (future (stream-to-enc stdout out-enc))
+            err (future (stream-to-string stderr))
             exit-code (.waitFor proc)]
-        {:exit exit-code :out out :err err}))))
+        {:exit exit-code :out @out :err @err}))))
 
 (comment