Fix: (org-ql-find) Use org-with-point-at
I keep pointing out to other people that they should use org-with-point-at, but I still have places in my own code where I need to use it, too!
This commit is contained in:
parent
8412d1a23d
commit
be20dc3d5b
3 changed files with 34 additions and 33 deletions
|
|
@ -83,8 +83,7 @@ single predicate)."
|
|||
:query-prefix query-prefix
|
||||
:query-filter query-filter
|
||||
:prompt prompt)))
|
||||
(with-current-buffer (marker-buffer marker)
|
||||
(goto-char marker)
|
||||
(org-with-point-at marker
|
||||
(display-buffer (current-buffer) org-ql-find-display-buffer-action)
|
||||
(select-window (get-buffer-window (current-buffer)))
|
||||
(run-hook-with-args 'org-ql-find-goto-hook))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue