From e18e5f956146ad77d735c0137d6e4c68bf58ee5f Mon Sep 17 00:00:00 2001
From: Ringo Wantanabe <flandre@chiru.no>
Date: Wed, 23 Jan 2019 19:00:49 +0000
Subject: [PATCH] oops

---
 utils.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/utils.lisp b/utils.lisp
index b4692ce..66f4cd8 100644
--- 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)