Permalink
Browse files

Update IFn Redirectable.

  • Loading branch information...
1 parent a46d751 commit ddb7021812b3ecb667f502b49e0694ae505fec36 @Raynes committed Sep 29, 2012
Showing with 3 additions and 4 deletions.
  1. +3 −4 src/conch/sh.clj
View
@@ -16,10 +16,9 @@
(extend-type clojure.lang.IFn
Redirectable
(redirect [f options k proc]
- (.start
- (Thread.
- #(doseq [buffer nil #_(buffer-stream (k proc) (:buffer options))]
- (f buffer proc))))))
+ (future
+ (doseq [buffer (get proc k)]
+ (f buffer proc)))))
(defn seqify? [options k]
(let [seqify (:seq options)]

0 comments on commit ddb7021

Please sign in to comment.