Remove: org-ql-find-heading, org-ql-find-path
These are virtually obsolete with the introduction of the "rifle" predicate as the default one. Having them now is just confusing.
This commit is contained in:
parent
bacdacb1b2
commit
5768c685ad
2 changed files with 0 additions and 34 deletions
|
|
@ -112,8 +112,6 @@ Lisp code examples are in [[examples.org]].
|
||||||
These commands jump to a heading selected using Emacs's built-in completion facilities with an Org QL query:
|
These commands jump to a heading selected using Emacs's built-in completion facilities with an Org QL query:
|
||||||
|
|
||||||
- ~org-ql-find~ searches all entry content.
|
- ~org-ql-find~ searches all entry content.
|
||||||
- ~org-ql-find-path~ searches only headings (using the ~outline-path:~ predicate).
|
|
||||||
- ~org-ql-find-heading~ searches only headings (using the ~heading:~ predicate).
|
|
||||||
|
|
||||||
[[images/org-ql-find.png]]
|
[[images/org-ql-find.png]]
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -194,40 +194,8 @@ single predicate)."
|
||||||
(run-hook-with-args 'org-ql-find-goto-hook))))))
|
(run-hook-with-args 'org-ql-find-goto-hook))))))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun org-ql-find-heading (buffers-files)
|
|
||||||
"Go to an Org entry in BUFFERS-FILES selected by searching with `org-ql'.
|
|
||||||
Only headings are searched (using the \"heading:\" predicate).
|
|
||||||
Interactively, with universal prefix, select multiple buffers to
|
|
||||||
search with completion."
|
|
||||||
(interactive
|
|
||||||
(list (if current-prefix-arg
|
|
||||||
(mapcar #'get-buffer
|
|
||||||
(completing-read-multiple
|
|
||||||
"Buffers: "
|
|
||||||
(mapcar #'buffer-name
|
|
||||||
(cl-remove-if-not (lambda (buffer)
|
|
||||||
(eq 'org-mode (buffer-local-value 'major-mode buffer)))
|
|
||||||
(buffer-list))) nil t))
|
|
||||||
(current-buffer))))
|
|
||||||
(org-ql-find buffers-files :prompt "Find heading: " :query-prefix "heading:"))
|
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun org-ql-find-path (buffers-files)
|
|
||||||
"Go to an Org entry in BUFFERS-FILES selected by searching with `org-ql'.
|
|
||||||
Only outline paths are searched (using the \"outline-path:\"
|
|
||||||
predicate). Interactively, with universal prefix, select
|
|
||||||
multiple buffers to search with completion."
|
|
||||||
(interactive
|
|
||||||
(list (if current-prefix-arg
|
|
||||||
(mapcar #'get-buffer
|
|
||||||
(completing-read-multiple
|
|
||||||
"Buffers: "
|
|
||||||
(mapcar #'buffer-name
|
|
||||||
(cl-remove-if-not (lambda (buffer)
|
|
||||||
(eq 'org-mode (buffer-local-value 'major-mode buffer)))
|
|
||||||
(buffer-list))) nil t))
|
|
||||||
(current-buffer))))
|
|
||||||
(org-ql-find buffers-files :prompt "Find outline path: " :query-prefix "outline-path:"))
|
|
||||||
|
|
||||||
(defun org-ql-find--snippet-simple (&optional _regexp)
|
(defun org-ql-find--snippet-simple (&optional _regexp)
|
||||||
"Return a snippet of the current entry.
|
"Return a snippet of the current entry.
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue