diff options
| author | Stuart Halloway <stu@thinkrelevance.com> | 2010-08-11 11:05:03 -0400 |
|---|---|---|
| committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-08-12 09:15:24 -0400 |
| commit | 3a3374f714e5a755b7de2a761f37696f07a74e80 (patch) | |
| tree | 8cb9e7e08f86e00e169447f5375dcd1897cdf390 | |
| parent | 9a1c51b23df6fe0fb9147dd2028334e5d8dea777 (diff) | |
preserve opts when creating socket reader, writer
Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>
| -rw-r--r-- | src/clj/clojure/java/io.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clj/clojure/java/io.clj b/src/clj/clojure/java/io.clj index f5c3d010..5f36755e 100644 --- a/src/clj/clojure/java/io.clj +++ b/src/clj/clojure/java/io.clj @@ -259,8 +259,8 @@ (extend Socket IOFactory (assoc default-streams-impl - :make-input-stream (fn [^Socket x opts] (.getInputStream x)) - :make-output-stream (fn [^Socket x opts] (.getOutputStream x)))) + :make-input-stream (fn [^Socket x opts] (make-input-stream (.getInputStream x) opts)) + :make-output-stream (fn [^Socket x opts] (make-output-stream (.getOutputStream x) opts)))) (extend byte-array-type IOFactory |