Browse files

Fixed bug with (selections [false] 3) returning nil

  • Loading branch information...
1 parent 95d8ac6 commit 20d43c45362e55e10f69a7be51a5c66e4a9c8123 @Engelberg Engelberg committed Jul 6, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/main/clojure/clojure/math/combinatorics.clj
View
2 src/main/clojure/clojure/math/combinatorics.clj
@@ -100,7 +100,7 @@ for a longer description.)"}
(when v-seqs
(cons (map first v-seqs)
(lazy-seq (step (increment v-seqs)))))))]
- (when (every? first seqs)
+ (when (every? seq seqs)
(lazy-seq (step v-original-seqs)))))

0 comments on commit 20d43c4

Please sign in to comment.