Add: (org-ql-find-display-buffer-action)

This commit is contained in:
Adam Porter 2022-10-07 18:34:55 -05:00
parent e54ba0102c
commit 5f70636556

View file

@ -43,6 +43,11 @@
"Functions called when selecting an entry." "Functions called when selecting an entry."
:type 'hook) :type 'hook)
(defcustom org-ql-find-display-buffer-action '(display-buffer-same-window)
"Display buffer action list for `org-ql-find'.
See function `display-buffer'."
:type 'sexp)
;;;; Functions ;;;; Functions
;;;###autoload ;;;###autoload
@ -80,7 +85,7 @@ single predicate)."
:prompt prompt))) :prompt prompt)))
(with-current-buffer (marker-buffer marker) (with-current-buffer (marker-buffer marker)
(goto-char marker) (goto-char marker)
(display-buffer (current-buffer)) (display-buffer (current-buffer) org-ql-find-display-buffer-action)
(select-window (get-buffer-window (current-buffer))) (select-window (get-buffer-window (current-buffer)))
(run-hook-with-args 'org-ql-find-goto-hook)))) (run-hook-with-args 'org-ql-find-goto-hook))))