oops

6 years ago · e18e5f9561
parent 602209deb6
commit e18e5f9561
1 changed files with 1 additions and 1 deletions
--- a/utils.lisp
+++ b/utils.lisp
@ -65,7 +65,7 @@

 (defun where (expr items)
  (mapcan #'(lambda (x)
-	      (when (funcall expr x) x))
+	      (when (funcall expr x) (list x)))
 	  items))

 (defun true (f)