Comment: Add TODO

This commit is contained in:
Adam Porter 2023-11-01 14:37:59 -05:00
parent bd2dd12a41
commit e885001a2a

View file

@ -137,6 +137,7 @@ which see (but only the files are used)."
;;;###autoload ;;;###autoload
(defun org-ql-find-path () (defun org-ql-find-path ()
"Call `org-ql-find' to search outline paths in the current buffer." "Call `org-ql-find' to search outline paths in the current buffer."
;; TODO: Use same interactive form as `org-ql-find'.
(interactive) (interactive)
(let ((org-ql-default-predicate 'outline-path)) (let ((org-ql-default-predicate 'outline-path))
(org-ql-find (current-buffer)))) (org-ql-find (current-buffer))))