From db6543b18c7dbeff93c62bfc7b62cb0c5af5f92d Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Wed, 22 Aug 2018 16:40:06 -0500 Subject: [PATCH] Fix: (org-ql--query) Error if run in non-Org-derived buffer --- org-ql.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/org-ql.el b/org-ql.el index 4edca3f..a54e328 100644 --- a/org-ql.el +++ b/org-ql.el @@ -117,6 +117,8 @@ a list of defined `org-ql' sorting methods: `date', `deadline', (user-error "Can't open file: %s" it))))) ;; Filter buffers (i.e. select items) (--map (with-current-buffer it + (unless (derived-mode-p 'org-mode) + (user-error "Not an Org buffer: %s" (buffer-name))) (org-ql--select-cached :predicate predicate :action action :narrow narrow))) ;; Flatten items (-flatten-n 1))))