diff options
| author | Rich Hickey <richhickey@gmail.com> | 2010-04-29 06:51:31 -0400 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2010-04-29 06:51:31 -0400 |
| commit | 1e156ebe7f55983bf9fed42c497fd336cfe46d43 (patch) | |
| tree | 4ec43033533a20631965497707b2c2300826321f | |
| parent | 9b78d483959e912a2ef77ff649b893b035144549 (diff) | |
fix keep-indexed on non-chunked seqs
| -rw-r--r-- | src/clj/clojure/core.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 00371db0..89a4ca6e 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -5142,6 +5142,6 @@ (chunk-cons (chunk b) (keepi (+ idx size) (chunk-rest s)))) (let [x (f idx (first s))] (if (nil? x) - (keepi f (inc idx) (rest s)) - (cons x (keepi f (rest s)))))))))] + (keepi (inc idx) (rest s)) + (cons x (keepi (inc idx) (rest s)))))))))] (keepi 0 coll)))) |