diff options
| author | Stuart Halloway <stu@thinkrelevance.com> | 2010-08-11 11:05:03 -0400 |
|---|---|---|
| committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-08-13 11:26:27 -0400 |
| commit | 62b9066a1f545b7457fb6e806acd946ce8bc3ab0 (patch) | |
| tree | f1bfb3ec5ac057e4b22f5e1cc2d9f91dbd365376 | |
| parent | c897f1314c948e0bee82111ce6b422a258c56bfc (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 |