Very minor cleanup

amalloy · Apr 5, 2011 · da53f0e · da53f0e
1 parent 4b762fa
commit da53f0e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/amalloy/utils.clj b/src/amalloy/utils.clj
@@ -10,7 +10,7 @@
 
 (defn iterate-until
   [pred f start]
-  (take-while (complement pred)
+  (take-while (! pred)
               (iterate f start)))
 
 (defn trim-seq "Trim a sequence at the first nil element"