Fix unchunk lazy-seq ordering bug.

clj-commons · May 25, 2014 · 19c6c3a · 19c6c3a
1 parent 1d1988c
commit 19c6c3a
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/clj/com/climate/claypoole/impl.clj b/src/clj/com/climate/claypoole/impl.clj
@@ -128,9 +128,10 @@
 
   Based on http://stackoverflow.com/questions/3407876/how-do-i-avoid-clojures-chunking-behavior-for-lazy-seqs-that-i-want-to-short-ci"
   [s]
-  (when-let [s (seq s)]
-    (cons (first s)
-          (lazy-seq (unchunk (rest s))))))
+  (lazy-seq
+    (when-let [s (seq s)]
+      (cons (first s)
+            (unchunk (rest s))))))
 
 (defn threadpool
   "Make a threadpool. It should be shutdown when no longer needed.