Fix bug in UNZIP-ALIST

Thanks to Hraban Luyat for pointing this out.
adlai · Jun 17, 2012 · efc77c0 · efc77c0
1 parent ec7ded8
commit efc77c0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/utils.lisp b/src/utils.lisp
@@ -14,7 +14,7 @@
 
 (defun unzip-alist (alist)
   "Returns two fresh lists containing the keys and values of ALIST"
-  (loop for pair on alist
+  (loop for pair in alist
      collect (car pair) into keys
      collect (cdr pair) into vals
      finally (return (values keys vals))))