From dc4bf65320f969154045000e6b6aec6ce73ea7e2 Mon Sep 17 00:00:00 2001 From: apc Date: Tue, 11 Feb 2025 21:05:22 -0500 Subject: [PATCH] Fix missing empty line and alignment --- org-ql-find.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/org-ql-find.el b/org-ql-find.el index 9ca743a..ebfd612 100644 --- a/org-ql-find.el +++ b/org-ql-find.el @@ -122,7 +122,7 @@ which see (but only the files are used)." ((and (pred listp) files) files))) (symbol (pcase (eval files-spec) ((and (pred stringp) file) (list file)) - ((and (pred listp) files) files))) + ((and (pred listp) files) files))) (list files-spec))))))) (list (org-ql-completing-read buffers-files :prompt "Refile to: ")))) (let ((buffer (or (buffer-base-buffer (marker-buffer marker)) @@ -139,6 +139,7 @@ which see (but only the files are used)." nil ;; Position marker)))) + ;;;###autoload (defun org-ql-find-in-agenda () "Call `org-ql-find' on `org-agenda-files'."