diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-04-09 18:08:13 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-04-09 18:08:13 +0000 |
| commit | 8e88388231dda1f026dbb4db9597d50e3594cdc0 (patch) | |
| tree | b298b56cc4044f3aca9667d9ab925a68b9a603d2 /src | |
| parent | 3c6ffedd187e69c824c5bfb7251a8a9de0cb3cca (diff) | |
fixed set/select
Diffstat (limited to 'src')
| -rw-r--r-- | src/set.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/set.clj b/src/set.clj index 330143ad..b678009b 100644 --- a/src/set.clj +++ b/src/set.clj @@ -27,7 +27,7 @@ (defn select "Returns a set of the elements for which pred is true" [pred xset] - (reduce (fn [s k] (if (pred k) (disj s k) s)) + (reduce (fn [s k] (if (pred k) s (disj s k))) xset xset)) (defn project |