From 86d2e38802d052ad6684a495de0416bd24dbe7b6 Mon Sep 17 00:00:00 2001
From: Adam Porter <adam@alphapapa.net>
Date: Fri, 8 Jun 2018 18:05:52 -0500
Subject: [PATCH] Add: (org-ql--fmap) Add debug declaration

---
 org-ql.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/org-ql.el b/org-ql.el
index b1d5f76..02e2a76 100644
--- a/org-ql.el
+++ b/org-ql.el
@@ -47,7 +47,7 @@ buffer (the default is to widen and search the entire buffer)."
        (t (user-error "SORT must be a function or a list of methods (see documentation)")))))
 
 (defmacro org-ql--fmap (fns &rest body)
-  (declare (indent defun))
+  (declare (indent defun) (debug (listp body)))
   `(cl-letf ,(cl-loop for (fn target) in fns
                       collect `((symbol-function ',fn)
                                 (symbol-function ,target)))