Fix: (org-ql-find) Don't use org-with-point-at

See <https://github.com/alphapapa/org-ql/issues/380#issuecomment-1881913025>.

Reported-by: Bram Schoenmakers <me@bramschoenmakers.nl>
This commit is contained in:
Adam Porter 2024-01-09 02:23:55 -06:00
parent 8595139f5b
commit 7ff6cc2ef7
3 changed files with 47 additions and 39 deletions

View file

@ -77,7 +77,7 @@ single predicate)."
:prompt prompt)))
(set-buffer (marker-buffer marker))
(pop-to-buffer (current-buffer) org-ql-find-display-buffer-action)
(org-with-point-at marker
(without-restriction
(run-hook-with-args 'org-ql-find-goto-hook))))
;;;###autoload