Call 0 arity function when all arguments to ignoring-nil are nil

Previously this would return nil if three or more arguments were
provided and all were nil.

Fixes #38

Author: danielcompton

src/flatland/useful/fn.clj

@@ -123,7 +123,7 @@
            (f a)
            (f a b))))
     ([a b & more]
-       (when-let [items (seq (remove nil? (list* a b more)))]
+       (let [items (seq (remove nil? (list* a b more)))]
          (apply f items)))))
 
 (defn key-comparator

test/flatland/useful/fn_test.clj

@@ -78,7 +78,10 @@
   (is (= 5 (thrush 1 inc inc inc inc))))
 
 (deftest test-ignoring-nils
-  (is (= 6 ((ignoring-nils +) 1 nil 2 nil nil 3))))
+  (is (= 6 ((ignoring-nils +) 1 nil 2 nil nil 3)))
+  (is (= 0 ((ignoring-nils +) nil nil)))
+  (is (= 0 ((ignoring-nils +) nil nil nil)))
+  (is (= 0 ((ignoring-nils +) nil nil nil nil))))
 
 (deftest test-key-comparator
   (let [subtract-comparator-fn-breaks-on-this [2147483650 2147483651