when -> whenlet

Somehow was changed.
2015-08-31 22:04:20 -07:00 · 2015-08-31 22:04:20 -07:00 · 32a4e9b9bd
parent 9ff4f34e44
commit 32a4e9b9bd
2 changed files with 2 additions and 2 deletions
--- a/kutils.asd
+++ b/kutils.asd
@ -11,5 +11,5 @@
 	       (:file "lol")
               (:file "kutils")
               (:file "kutils-hash-tables")
-	       (:file "macros.lisp")))
+	       (:file "macros")))

--- a/macros.lisp
+++ b/macros.lisp
@ -4,7 +4,7 @@

 ;;; Various utility macros.

-(defmacro when (bindings &body body)
+(defmacro whenlet (bindings &body body)
  "Evaluate the bindings in a let form; if they all evaluate to T,
 evaluate @c(body) in an implicit @c(progn)."
  (let ((bindings (if (listp (first bindings)) bindings (list bindings))))