diff options
| -rw-r--r-- | src/clj/clojure/core.clj | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 7859ba44..e8068dff 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -1465,10 +1465,10 @@ false." {:tag Boolean} [pred coll] - (if (seq coll) - (and (pred (first coll)) - (recur pred (next coll))) - true)) + (cond + (nil? (seq coll)) true + (pred (first coll)) (recur pred (next coll)) + :else false)) (def #^{:tag Boolean |