aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/clojure/contrib/duck_streams.clj2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/duck_streams.clj b/src/clojure/contrib/duck_streams.clj
index 35af8ad7..f15e0ee4 100644
--- a/src/clojure/contrib/duck_streams.clj
+++ b/src/clojure/contrib/duck_streams.clj
@@ -316,7 +316,7 @@
(loop []
(let [size (.read input buffer)]
(when (pos? size)
- (let [chars (.toCharArray (String. buffer *default-encoding*))]
+ (let [chars (.toCharArray (String. buffer 0 size *default-encoding*))]
(do (.write output chars)
(recur))))))))