Removed call to #'CURRY

adlai · Sep 1, 2009 · efc4728 · efc4728
1 parent 2bb4e17
commit efc4728
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/tests.lisp b/tests/tests.lisp
@@ -218,7 +218,7 @@
   (for-all ((s (gen-string :elements (constantly (code-char 0))
                            :length (constantly 2))))
     (is (= 2 (length s)))
-    (is (every (curry #'char= #\Null) s))))
+    (is (every (fn (char= _ #\Null)) s))))
 
 (defun dummy-mv-generator ()
   (lambda ()