Fix to if-some as the docs say

This commit is contained in:
Tommi Reiman 2018-11-04 20:54:52 +02:00
parent 35993ff257
commit 48318b8793

View file

@ -25,7 +25,7 @@
[f coll]
(reduce-kv
(fn [coll k v]
(if-let [v' (f v)]
(if-some [v' (f v)]
(assoc coll k v')
coll))
coll